Hi, hab grad mal ne Frage, evtl ist jemand wach und kann mir kurz sagen wo der fehler liegt?
hier der code:
Code:
procedure TForm1.Button1Click(Sender: TObject);
var a: integer;
begin
a := 0 ;
//for a := 0 to 10 do
repeat
if BerechnungStart = true then begin
v[a] := FloatToStr((Volumenstrom * 4) / ( StrToInt(d[a]) * 3.1416 * 1000 ));
memo1.Lines.add(v[a]);
inc (a);
end;
until
if a = j then
BerechnungStart := false;
end;
wenn ich versuche zu compilieren kommt folgende fehlermeldung:
[Fehler] Rohrnetzberechnung.pas(249): Ausdruckstyp muss BOOLEAN sein
allerdings verstehe ich nicht wieso...
für den fall dass a=j (a = 10 // soll nur 10 berechnungen anzeigen) soll BerechnugsStart auf false gesetzt werden damit nicht weiter gerechnet wird.
hoffe mir kann jemand helfen.
Gruß