in edit2 soll ein Bruch eingegeben werden können. Was muss ich dafür verändern?
Das ist der Quelltext:
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var L: real;
begin
L:=StrToInt(edit2.Text);
if (StrToInt(edit1.Text)=H+1) and (L=(F/(H+1))) then
begin
label7.visible:=true;
end;
[edit=Matze][delphi]-Tags gesetzt. Zukünftig bitte selbst erledigen. Mfg, Matze[/edit]