Forum: Sonstige Fragen zu Delphi
Delphi
by theroad,
18. Nov 2008
Also statt . ein , zu setzen (16,95) zählt er schonmal also ich bekomme in meinem Label einen Wert jedoch ist der flasch sobald ich nocheinen Artikel draufrechne stimmt der wert nicht mehr dann habe ich schon 3 mal 16,95 ausgerechnet obwohl ich nur 2Artikel drinn habe. Er rechnet irgendwie zweimal.
procedure TForm3.Button1Click(Sender: TObject);
var
zahl,b, i : integer;
b2: real;
begin...
Forum: Sonstige Fragen zu Delphi
Delphi
by theroad,
17. Nov 2008
Ich bekomme es einfach nicht hin. :oops:
Hier einmal der ganze Quellcode der dahinter steckt. in memo2 sind die zahlen immer so eingetragen: z.b. 16.95
Jedoch bleibt der wert im label immer 0 :(
procedure TForm3.Button1Click(Sender: TObject);
var
zahl,b, i : integer;
b2: real;
begin
eancode := InputBox('Eancode','Bitte den Eancode einscannen!','');
q := 'Select * From artikel Where...
Forum: Sonstige Fragen zu Delphi
Delphi
by theroad,
15. Nov 2008
Habe das jetzt mal so gemacht:
for i := 0 to memo2.Lines.Count do begin
i++
b2:= strtofloat(memo2.Lines.Strings);
summe2:= summe2 + b2;
label1.Caption:= floattostr(summe2);
es funktioniert nur leider nicht, die Variabelen habe ich alle als Real deklariert.
Es kommt dieser Fehler:
Forum: Sonstige Fragen zu Delphi
Delphi
by theroad,
15. Nov 2008
Hallo,
ich habe ein Memo in dem Zahlenwerte stehen (mit kommastellen) diese möchte ich gerne zusammenrechnen.
Ich habe leider keine informationen gefunden wie ich die einzelnen Zeilen addieren kann.
Vielen Dank im voraus
MFG
