Einzelnen Beitrag anzeigen

Benutzerbild von dataspider
dataspider

Registriert seit: 9. Nov 2003
Ort: 04539 Groitzsch
1.351 Beiträge
 
Delphi 11 Alexandria
 
#2

Re: Komponente zur Laufzeit erzeugen - Funktion zuweisen?

  Alt 2. Jul 2006, 09:53
Hi,

wie wäre es mit:

Delphi-Quellcode:
with Bild do begin
  Parent:=Form1.Groupbox3;
  Left:=8 + i*49;
  Top:=16;
  Transparent := true;
  Picture.LoadFromFile(ExtractFilePath(ParamStr(0))+'\data\skin\'+skin+'\'+BildText);
  OnClick:=KarteBenutzen;
  Tag := i;
end;
Dann kannst du im Event über das Tag des Senders den Wert bestimmen.

Cu, Frank
Frank Reim
  Mit Zitat antworten Zitat