Registriert seit: 29. Nov 2020
1 Beiträge
|
AW: Problem mit statischer dll in Lazarus
29. Nov 2020, 01:54
Hallo ich bitte euch schnell um Hilfe
ich schreibe gerade mein Programm bei Lazarus und es kommt die ganze zeit das selbe Fehler
procedure TForm1.Button1Click(Sender: TObject);
var anzahl:integer;
einzelpreis, summe, nettopreis, gegeben, rueckgeld, mwst: real;
begin
//Eingabe
anzahl:=strtoint(Edit2.Text);
einzelpreis:=strtofloat(Edit3.Text);
gegeben:=strtofloat(Edit4.Text);
//Verarbeitung
summe:=anzahl*einzelpreis;
nettopreis:=summe/1.19;
rueckgeld:=gegeben-summe;
mwst:=summe-nettopreis
//Ausgabe
AL1.Caption:=floattostr(summe);
AL2.Caption:=formatfloat('0.00',nettopreis);
ALrg.Caption:=floattostr(Rueckgeld);
end;
end.
der Fehler lautet: unit1.pas(66,4) Fatal:Syntex error; ";"expected but "identifierAL1" found
|