Ver Mensaje Individual
  #11  
Antiguo 08-06-2012
Avatar de martini002
martini002 martini002 is offline
Miembro
 
Registrado: may 2012
Ubicación: Puerto Ordaz - Venezuela
Posts: 175
Reputación: 13
martini002 Va por buen camino
Hola Chris.

Hermano la cuestion es que no se utilizar los objetos TImage,
estuve buscando info pero no encontre algo que me explicara bien
por el momento las he seguido usando como hasta ahora habia hecho
llamandolas de un arhivo externo; en un par de horas avance bastante
en este proyecto, ya reparte las cartas aleatoriamente con las imagenes y todo
los botones funcionan perfectamente; el siguiente codigo quedo asi:

Código Delphi [-]
procedure TForm1.BotVersusClick(Sender: TObject);
begin
  Form2.Show; 
end;

Lo que hace que funcionen los botones y las imagenes

ahora lo que no entiendo es lo siguiente:

Código Delphi [-]
//En el evento "OnQueryClose" del Form2, agrega el siguiente código:
procedure TForm2.OnQueryClose(...);
begin
action := caFree;
end;

Nunca he sabido que quiere decir Query,
para que funciona este codigo?

y supongo que el siguiente es para llamar las imagenes de
la lista de imagenes en el objeto TImage?

Código Delphi [-]
procedure TForm2.BotRepartirMouseEnter(Sender: TObject);
begin
    Self.BotRepartir.Picture := Image1.Picture;
end;

procedure TForm2.BotRepartirMouseLeave(Sender: TObject);
begin
   Self.BotRepartir.Picture := Image2.Picture;
end;

La cuestion es que no se trabajar con TImage aun!
Excelente intervencion
gracias Chris

Última edición por ecfisa fecha: 08-06-2012 a las 19:08:43. Razón: corregir etiquetas
Responder Con Cita