Ich verstehe nicht so genau, was ich machen soll (Ich programmiere noch nicht lange mit Delphi).
Das wäre das Grundgerüst meiner Procedure:
Delphi-Quellcode:
procedure ZahlEingabe(y: Integer);
begin
if Edit.Text = '0' then
begin
Edit.Text := y;
end
else
begin
Edit.Text := Edit.Text + y;
end;
end;
kannst du mir vllt mit meinem Grundgerüst genauer zeigen, wie du es meinst?
Danke
"Zwei Dinge sind unendlich, das Universum und die menschliche Dummheit, aber bei dem Universum bin ich mir noch nicht ganz sicher."
Albert Einstein