Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Otros entornos y lenguajes > C++ Builder
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 02-04-2007
lccoyote lccoyote is offline
Registrado
 
Registrado: abr 2007
Posts: 5
Poder: 0
lccoyote Va por buen camino
TMemo no seleccionable

Hola necesito utilizar un TMemo como si fuera un TLabel ya que tengo que meterle un texto demasiado largo para un TLabel, el problema es que el TMemo permite seleccionar el texto (aunque se pongo readonly=true) y preferiría que no lo hiciera, ¿Sabe alguien alguna forma de evitar esto ?
Responder Con Cita
  #2  
Antiguo 02-04-2007
Avatar de Bicho
[Bicho] Bicho is offline
Miembro Premium
 
Registrado: jul 2003
Ubicación: Inca - Mallorca
Posts: 1.776
Poder: 22
Bicho Va por buen camino
Hola,

puedes insertar un panel y dentro de ese panel metes el memo. Al panel le pones la propiedad enabled := False y el memo será intocable.
Además si al memo le pones align := AlClient, no se notará para nada el panel de detras.

Espero te sirva.

Saludos
Responder Con Cita
  #3  
Antiguo 02-04-2007
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Poder: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Fantástico truco Bicho. Gracias. Pero por otro lado tal vez un "Tlabel" bastaría, con su propiedad "AutoSize" a "False" y acaso su propiedad "WordWrap" en "True". Pero de todos modos estupendo truco Bicho.
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita
  #4  
Antiguo 03-04-2007
Avatar de Bicho
[Bicho] Bicho is offline
Miembro Premium
 
Registrado: jul 2003
Ubicación: Inca - Mallorca
Posts: 1.776
Poder: 22
Bicho Va por buen camino
Hola,

gracias amigo David, yo lo he usado otras veces y tiene su utilidad.
Quizá para el caso de lccoyote, no sirva el poner un label, me explico:
- Puede ser que nos interese tener una gran cantidad de información (que de otro modo tambien puede mostrarse en el mismo label), pero que dependiendo de ciertas circumstancias, como puedan ser, una parámetro de la aplicación o el usuario que la ejecute, sólo tenga acceso a ese memo en modo de lectura, mientras otro estado o usuario tenga acceso de escritura en el mismo. No se si me explico.

Yo lo he cogido por allí, ya que yo me he encontrado en la situación, que para algo más sencillo bastaría un label.

De todos modos, es bueno saber que sigo siendo de ayuda. En esta semana estoy recluido con un curso en horario laboral, y al terminarlo y volver a casa, a estudiar para la universidad. Y la verdad, no he tenido apenas tiempo de pasar por aquí.
Por otra parte, me extraña que a nadie se le hubiera ocurrido antes, creo que lo he visto escrito alguna vez, algo parecido a Lepe sino recuerdo mal.

En fin, me vuelo a estudiar

Saludos

P.d: lccoyote bienvenido al clubdelphi
Responder Con Cita
  #5  
Antiguo 03-04-2007
lccoyote lccoyote is offline
Registrado
 
Registrado: abr 2007
Posts: 5
Poder: 0
lccoyote Va por buen camino
Hola a todosotra vez y gracias por las respuestas, he probado a meterlo dentro del panel disabled como dijo bicho y funciona perfectamente, muchas gracias por la ayuda. El problema por el que tengo que usar el TMemo es porque tengo un texto muy grande que no me entra en un Label y me interesa tenerlo sin partir.
Muchas Gracias
Responder Con Cita
  #6  
Antiguo 03-04-2007
Avatar de vtdeleon
vtdeleon vtdeleon is offline
Miembro
 
Registrado: abr 2004
Ubicación: RD & USA
Posts: 3.236
Poder: 23
vtdeleon Va por buen camino
Y en caso de que tenga la barra de Scroll?


Saludos
__________________
Van Troi De León
(Not) Guía, Code vB:=Delphi-SQL, ¿Cómo?
Viajar en el tiempo no es teóricamente posible, pues si lo fuera, ya estarían aqui contándonos al respecto!
Responder Con Cita
  #7  
Antiguo 04-04-2007
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
¿Qué significa eso de que el texto no entra en un tlabel? Hasta donde yo sé el único límite sería el dado por la memoria disponible. Siendo que un Memo consume más recursos que un label, no veo necesidad de usar el memo.

// Saludos
Responder Con Cita
  #8  
Antiguo 04-04-2007
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 25
Caral Va por buen camino
Hola
Como dice el maestro Roman, se puede poner en un tlabel la cantidad de texto que se quiera, un ejemplito:
Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
   Label1.Caption := 'En esta linea coloco lo que quiera'+ chr(13) +
                     'y sigo poniendo cosas'+ chr(13) +
                     'asi sucesivamente hasta el infinito';
end;
Saludos
Responder Con Cita
  #9  
Antiguo 04-04-2007
[egostar] egostar is offline
Registrado
 
Registrado: feb 2006
Posts: 6.556
Poder: 25
egostar Va camino a la fama
Incluso sin los Char(13).

Solo con poner la propiedad WordWrap a True.

Código Delphi [-]
procedure TForm1.FormActivate(Sender: TObject);
begin
   Label1.Caption := 'En esta linea coloco lo que quiera'+
                     'y sigo poniendo cosas '+
                     'asi sucesivamente hasta el infinito';
end;

Edito: Solo con la limitante de 255 caracteres, que se evita concatenando las cadenas.
Edito parte 2: También es necesario poner la propiedad AutoSize a False y abrirlo al tamaño adecuado o deseado.

Salud OS.
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney

Última edición por egostar fecha: 04-04-2007 a las 00:40:26.
Responder Con Cita
  #10  
Antiguo 04-04-2007
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 25
Caral Va por buen camino
Ves otra cosa que se aprende, gracias egostar
Saludos
Responder Con Cita
  #11  
Antiguo 04-04-2007
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
No sé, no sé, no quiero quitar méritos a nadie pero:

Cita:
Empezado por dec en el tercer mensaje del hilo
con su propiedad "AutoSize" a "False" y acaso su propiedad "WordWrap" en "True"


// Saludos
Responder Con Cita
  #12  
Antiguo 04-04-2007
[egostar] egostar is offline
Registrado
 
Registrado: feb 2006
Posts: 6.556
Poder: 25
egostar Va camino a la fama
Cita:
Empezado por roman
No sé, no sé, no quiero quitar méritos a nadie pero:

Originalmente Escrito por dec en el tercer mensaje del hilo
con su propiedad "AutoSize" a "False" y acaso su propiedad "WordWrap" en "True"



// Saludos
Correcto, honor a quien honor merece.

Salud OS.
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney
Responder Con Cita
  #13  
Antiguo 10-04-2007
lccoyote lccoyote is offline
Registrado
 
Registrado: abr 2007
Posts: 5
Poder: 0
lccoyote Va por buen camino
Pues está bien saber que se puede poner texto del tamaño que se quiera concatenadolo, el problema es que no se si eso me serviría porque yo el texto lo recivo entero, no puedo partirlo (en principio), me llega entero y no siempre medirá lo mismo (por temas de localizacion) dependerá del idioma.....Aunque supongo que podría tratarlo e ir partiendolo en "sub-textos", pero no sé si merecerá la pena asumir ese coste, pudiendo usar otro componente?????
Responder Con Cita
  #14  
Antiguo 10-04-2007
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Pero, ¿quién dice que tienes que partirlo en trozos? La limitante que menciona egostar, aplica sólo para las literales de texto que no tienen nada que ver con el memo. ¿En qué forma recibes el texto?

// Saludos
Responder Con Cita
  #15  
Antiguo 10-04-2007
lccoyote lccoyote is offline
Registrado
 
Registrado: abr 2007
Posts: 5
Poder: 0
lccoyote Va por buen camino
No, en el memo no tengo limitaciones pero en el TLabel si, si pongo el texto todo seguido, no entra...
Responder Con Cita
  #16  
Antiguo 10-04-2007
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Perdón, me refería a un label, no tiene limitaciones. Por ejemplo, puedo poner:

Código Delphi [-]
var
  sl: TStringList;

begin
  sl := TStringList.Create;
  try
    sl.LoadFromFile('archivo.txt');
    Label1.Caption := sl.Text;
  finally
    sl.Free;
  end;
end;

Y archivo.txt puede ser tan grande como quiera. El único problema está al asignar valore literales, como ene le ejemplo de egostar; pero si el texto lo tomas de un archivo, un stream, una variable, etc., no dbe haber ningún problema

// Saludos
Responder Con Cita
  #17  
Antiguo 10-04-2007
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Poder: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Acabo de hacer la prueba con un texto de 22911 líneas, y sí cabe en un label, claro, con su respectivo scrollbox.



// Saludos
Responder Con Cita
  #18  
Antiguo 10-04-2007
lccoyote lccoyote is offline
Registrado
 
Registrado: abr 2007
Posts: 5
Poder: 0
lccoyote Va por buen camino
Claro, yo estaba metiendo el texto directamente en el caption de la label (en el .dfm. Y aqui no deja meter todo el texto que quiera....No probe a meterlo desde código, supuse que funcionaría igual.
Responder Con Cita
  #19  
Antiguo 10-04-2007
[egostar] egostar is offline
Registrado
 
Registrado: feb 2006
Posts: 6.556
Poder: 25
egostar Va camino a la fama
Cita:
Empezado por roman
Acabo de hacer la prueba con un texto de 22911 líneas, y sí cabe en un label, claro, con su respectivo scrollbox.



// Saludos
Pues haciendo uso de lo que nuestro buen amigo Caral comento en este mismo hilo.

Cita:
Empezado por Caral
Ves otra cosa que se aprende,
Pues eso, gracias roman,

Salud OS.
__________________
"La forma de empezar es dejar de hablar y empezar a hacerlo." - Walt Disney
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Posición en un TMemo ixMike OOP 2 13-08-2006 20:28:46
copiar un TMemo en un .txt nenufer Varios 4 11-05-2006 18:37:49
Poner titulo no seleccionable en la lista de valores de un DBComboBox TrUnkS OOP 0 15-04-2006 04:45:01
Tmemo gontxalo OOP 1 30-07-2005 13:01:43
Uso de TMemo Luli Varios 3 21-04-2005 23:15:15


La franja horaria es GMT +2. Ahora son las 12:07:28.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi