Ver Mensaje Individual
  #3  
Antiguo 21-10-2013
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.

No sé que objetos vas a depositar en el form, pero otra opción (creo que la mas ortodoxa) es usar la propiedad Hint.

En un nuevo form poné cinco Edits y probá este código en el evento OnCreate del form:
Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
const
   CLUBES :array[0..4] of string=('Velez','River','Boca','San Lorenzo','Independiente');
var
  i: Integer;
begin
  for i:= 0 to ControlCount-1 do
    with Controls[i] as TEdit do
    begin
      Text := CLUBES[i];
      ShowHint := True;
      Hint :=  CLUBES[i] + ' es un club de futbol argentino' + #10#13 + 'continua el mensaje...';
    end;
end;

Saludos.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita