hallo ich habe ein Problem mit meiner Funktion
ich will eine funkion schreiben damit ich nicht immer bei meinem Taschenrechner bei jeder zeile den quelltext schreiben muss will dort nur noch die funktion auf rufen und dann soll es klappen
kann mir jemand dabei vielleicht helfen
Delphi-Quellcode:
function Taste (tas:Tbutton): integer; forward;
var strZahl: string;
dblX : double;
begin
if edtEingabe.Text = '0' then
edtEingabe.Text := tas.caption
else
edt.Eingabe.Text := edtEingabe.Text + tas.Caption;
strZahl := edtEingabe.Text;
dblX := StrToFloat (StrZahl);
end;
hoffe das man so eine Funktion erstellt
danke als mal für die hilfe