Registriert seit: 5. Jul 2011
4 Beiträge
|
AW: Delphi Procedure Programm Hilfe
5. Jul 2011, 11:10
Änder mal testweise das Button-Event so ab:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
x, c : real;
begin
x := StrToFloat (Edit1.text);
c := StrToFloat (Edit2.text);
pformel (x, c);
ShowMessage('2* '+Edit1.text+'² +'+Edit2.text+' = '+FloatToStr (y));
end;
Wird nun ein Dialog angezeit?
Was zeigt der?
jetzt kommt ein ergebnis in dem fenster
|