Ich bin realtiv unerfahren mit Pascal und wollte ein einfaches Programm schreiben. Dazu habe ich 16 Buttons die selbst nichts anderes machen als zwei andere Proceduren aufzurufen. Nun scheint es mir etwas umständlich für jeden Button eine einzelne Procedur zu erstellen die dazu nur aus zwei Zeilen Code besteht. Meine Frage ist nun ob jemand einen weg kennt für alle 16 Buttons eine Procedure zu erstellen?
Zu dem währe es relativ wichtig für das Programm, wenn ich obwohl ich nur eine Procedure habe trotzdem mit einer Variable den Eigentlichen Button von welchen das Signal besendet wurde unterscheiden könnte da ich die zwei, inerhalb der Procedure aufzurufenden Proceduren mit einer Integer Variable aufrufen muss.
Von der Idee her also:
Delphi-Quellcode:
procedure TForm1.ButtonXClick(Sender: TObject);
begin
Procedure1(X);
Procedure2(X);
end;
Hoffe was ich meine ist verständlich und möglich.