Forum: Object-Pascal / Delphi-Language
Delphi
by IncredFx,
24. Jan 2018
Danke für die weiteren Antworten. Habe es wie folgt gelöst;
procedure TForm1.PanelNumberClick(Sender: TObject);
var
Panelcap : string;
begin
if Sender is Tpanel then
Panelcap := TPanel(Sender).caption;
resultedit.Text := (resultedit.Text + Panelcap);
Forum: Object-Pascal / Delphi-Language
Delphi
by IncredFx,
24. Jan 2018
Perfekt, endlich funktionierts! Gleich mal 60 Zeilen Code gespart :-D Danke für die verständnisvolle Erklärung.
Forum: Object-Pascal / Delphi-Language
Delphi
by IncredFx,
24. Jan 2018
Hallo zusammen,
vorneweg entschuldige ich mich schon einmal für den eventuell falsch gewählten Titel, aber ich weiß nicht wirklich wie ich es sonst nennen soll.
Ich bin ziemlicher Neuling was Delphi angeht, als eines meiner ersten "Spielereien" habe ich einen Taschenrechner erstellt. Dieser arbeitet mittlerweile auch so wie ich es will. Jedoch habe ich einige Procedures für jeden Button (bzw....