Forum: Programmieren allgemein
Delphi
by pustekuchen,
21. Mär 2011
Anstatt
procedure MethodenName()
das hier
procedure Form1.MethodenName()
Forum: Programmieren allgemein
Delphi
by pustekuchen,
21. Mär 2011
Du solltest evnt die Methode umschreiben.
Ich weiß nicht ob es jetzt eine saubere Lösung ist oder ob es noch besser geht, aber du könntest den Sender im Bezug auf die Tag Eigenschaft benutzten.
case (Sender as TButton).Tag of
0: choice := 0;
1: choice := 1;
2: choice := 2;
3: choice := 3;
end;
Forum: Programmieren allgemein
Delphi
by pustekuchen,
21. Mär 2011
Danke. Genau das hab ich mich vor 10 min auch gefragt^^
So könnte es aussehen:
(FindComponent('Image' +IntToStr(choice+1)) as TPicture).LoadFromFile(....);