Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Sharky,
10. Okt 2007
Dann übergebe deiner Procedure den Wert doch einfach als Parameter.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Sharky,
10. Okt 2007
Hai Jack23,
ich würde versuchen die "Entscheidung" nicht von der Caption abhängig zumachen. Du kannst jedem Button einen eindeutigen Wert in der Eigenschaft Tag zuweisen und dann diese auswerten.
procedure TDemo_Form.FormCreate(Sender: TObject);
begin
Button1.Tag := 1;
Button2.Tag := 2;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Sharky,
10. Okt 2007
Hai Jack23,
um deine Frage zu beantworten:
Weise allen Buttons das selbe OnClick Ereigniss zu und arbeite dann mit dem Sender.
procedure TDemo_Form.AllButtonClick(Sender: TObject);
var
btn_Caption: string;
begin