Forum: Object-Pascal / Delphi-Language
Delphi
by unchained,
25. Feb 2010
Bis man erstmal weiß was das Problem ist :D. Hab mich auch nen Wolf gegoogelt.
Forum: Object-Pascal / Delphi-Language
Delphi
by unchained,
25. Feb 2010
Ich danke dir vielmals !!!! Es funktioniert super. Die Lösung ist ja dann unter Button6 recht simpel. Manchmal seh ich den Wald vor lauter Bäumen nicht :D.
Nochmals Dankeschön ! :) Der Abend ist gerettet.
Forum: Object-Pascal / Delphi-Language
Delphi
by unchained,
25. Feb 2010
ich habs mal komplett angehängt.
Forum: Object-Pascal / Delphi-Language
Delphi
by unchained,
25. Feb 2010
Grad probiert. Das ändert leider nichts. :(
Forum: Object-Pascal / Delphi-Language
Delphi
by unchained,
25. Feb 2010
Kopiere ich die Funktion:
function GridRowSum(const TheGrid: TStringGrid; RowIndex: integer; IgnoreFixedCols: Boolean = true): double;
an die benannte Stelle werden weitere Fehler angezeigt.
Unit1.pas(140): ';' erwartet, aber '.' gefunden
-------------------------------------------------------------------------------------------------------------
implementation
{$R *.dfm}
Forum: Object-Pascal / Delphi-Language
Delphi
by unchained,
25. Feb 2010
er kompiliert nicht.
http://666kb.com/i/bh0beup4tonmb3lxw.jpg
http://666kb.com/i/bh0bhna9lbdncpj2s.jpg
Grafik entfernt und dem Beitrag angehängt Mfg, mkinzler
Forum: Object-Pascal / Delphi-Language
Delphi
by unchained,
25. Feb 2010
Sry, das funktioniert leider nicht. :(
Es funktioniert ja auch mit der funktion "Zellen löschen", dass auf alle zellen zugegriffen wird und diese "clear" werden.
procedure TForm1.Button2Click(Sender: TObject);
var
I: Integer;
begin
for I := 0 to StringGrid1.RowCount - 1 do
StringGrid1.Rows.Clear();
Forum: Object-Pascal / Delphi-Language
Delphi
by unchained,
25. Feb 2010
also so siehts aus:
"ergebnis" ist der wert der aus einer bestellung hervorgeht, quasi der einzelbestellwert.
Im stringgrid werden viele dieser einzelbestellwerte aufgelistet und sollen über "button6" addiert und in einem Label ausgegeben werden.
procedure TForm1.Button6Click(Sender: TObject);
var
y, x : integer;
ergebnis : double;
Forum: Object-Pascal / Delphi-Language
Delphi
by unchained,
25. Feb 2010
ja soweit war ich auch :) dennoch möchte ich das ergebnis ungern am ende der zeile haben, sondern als showmessage oder in einem label.
da liegt der hund begraben
Forum: Object-Pascal / Delphi-Language
Delphi
by unchained,
25. Feb 2010
Hi Leute.
Ich arbeite wieder an einem Kassenprogramm und möchte die Gesamtsumme der Bestellwerte, welche in ein Stringgrid gelistet werden (Button Bestellung Abgeben) mit einem Knopfdruck in einem Label angezeigt haben (Button Gesamtverkauf des Abends).
ich habe schon verschiedene Methoden und Wege versucht aber nichts hat geklappt. Habs mit Stringgrid-Löschen funktion versucht und die...