Re: Auswertung?
wie ist denn das gemeint mit result nicht zugewiesen?
|
Re: Auswertung?
Delphi-Quellcode:
function Bla(a,b: integer): integer;
var gesamt: integer; begin gesamt := a + b; Result := gesamt; //hier wird Result zugewiesen end; |
Re: Auswertung?
Anstatt herum zu raten, poste einfach mal die Units...
|
Re: Auswertung?
Aber nur die relevanten Teile, nicht dass hier gleich 10.000 Zeilen Code gepostet werden.
|
Re: Auswertung?
Zitat:
|
Re: Auswertung?
in Unit2:
Delphi-Quellcode:
in Unit15:
var
er1,er2,er3,er4 : integer;
Delphi-Quellcode:
dies ist dann auch so für er2,er3 und er4
...
if label18.Caption = label19.Caption then begin p:= p+1; label10.Visible:= true; end else label11.Visible:= true; ... er1:= p; am Ende dann Unit19:
Delphi-Quellcode:
var er, pro: real ;
begin er:= er1 + ((er2)/ 4) + ((er3)/ 2) + er4; pro := (er * 100) / 20; Label1.Caption:= floattostr(pro); |
Re: Auswertung?
Und in pro steht am Ende 0?
|
Re: Auswertung?
da steht immer null, sollte aber nicht
|
Re: Auswertung?
Und Du hast kontrolliert (z.B. per ShowMessage), ob er1 bis er4 nicht 0 sind?
|
Re: Auswertung?
wenn ich in unit19
Delphi-Quellcode:
hinschreib, dann kommt wenn ich das programm starte die nachricht 0.
ShowMessage(floattostr(er1));
Aber wieso kommt das gleich wenn ich das programm starte? |
Alle Zeitangaben in WEZ +1. Es ist jetzt 21:59 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz