Einzelnen Beitrag anzeigen

osama.jla

Registriert seit: 29. Nov 2020
1 Beiträge
 
#8

AW: Problem mit statischer dll in Lazarus

  Alt 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
  Mit Zitat antworten Zitat