Hallo. Ich habe für die Schule ein Programm rausgesucht und soll es an Hand des Codes erklären.
Es ist ein Programm das DM in Euro umrechnet.
Kann mir jemand folgenden Code bitte erklären?
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
| procedure TForm1.Edit1Change(Sender: TObject);
var x,y:real;
begin
if not edit1.Focused then exit;
try
x:=strToFloat(edit1.text);
y:=1.95583*x;
edit2.text:=formatfloat('0.##',y);
except edit2.text:='' End;
end;
procedure TForm1.Edit2Change(Sender: TObject);
var x,y:real;
begin
if not edit2.Focused then exit;
try
y:=strToFloat(edit2.text);
x:=1/1.95583*y;
edit1.text:=formatfloat('0.##',x);
except edit1.text:='' End;
end; |
Also ich weiß was strToFloat,1.95583,edit2.text und real. Aber wofür steht formatfloat z.b?
Bitte um schnelle Antwort.
Gruß und tausend Dank
Phillipp
Moderiert von 
Gausi: Beitragsformatierung überarbeitet.
in der Entwickler-Ecke!
