Forum: Programmieren allgemein
by Natcree,
10. Mär 2013
habe den Fehler gefunden
Fgesamt1 := FGesamt1 + Form7.irgendwas1.summe1;
habe es geändert
Fgesamt1 := Form7.irgendwas1.summe1;
Danke für den tip manchmal ist mann echt blind....
Forum: Programmieren allgemein
by Natcree,
10. Mär 2013
ich checke es nochmal
kann mann den speicher nicht einfach freigeben so das er wieder bei null anfängt
wenn ich in diesen codefunction TIrgendwas.GetSumme: double;
begin
Result := ferstezahl+fzweitezahl;
end;
wenn es so steht dann rechnet er falsch obwohl dies richtig wäre da fzweitezahl row-1 ist in der spalte bestand. und ferstezahl splate einnahmen
Forum: Programmieren allgemein
by Natcree,
10. Mär 2013
habe es jetzt hinbekommen. Danke erstmal an alle jetzt habe ich noch eine Frage.
Ich habe 2 objectlisten erstellt einmal für einnahme und einmal für ausgabe für das kassen buch jedoch rechnet er immer mit dem im speicher geladenen Daten siehe Bild. Wie kann ich das am besten ändern???
Forum: Programmieren allgemein
by Natcree,
10. Mär 2013
hat er vielleicht probleme damit 2 objecktclassen zu createn und zu bedienen???
hier mal der code von form1
if form7.ShowModal = mrok then
begin
FObjects.Add(Form7.Irgendwas);
FGesamt := FGesamt + Form7.Irgendwas.Summe;
eltreestringgrid1.Cells := Form7.Irgendwas.ErsteZahlAsString + ' €';
eltreestringgrid1.cells := form7.Irgendwas.ZweiteZahlAsString + ' €';
Forum: Programmieren allgemein
by Natcree,
10. Mär 2013
type
TIrgendwas1 = class
FIrgendwas1 gehört zu dieser class
Forum: Programmieren allgemein
by Natcree,
10. Mär 2013
müsste an der zweiten objecktlist liegen vorher mit der ersten ging es
Forum: Programmieren allgemein
by Natcree,
10. Mär 2013
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, ElPanel, ElClock, LMDBaseControl,
LMDBaseGraphicControl, LMDGraphicControl, LMDLEDCustomLabel, LMDLEDLabel,
LMDControl, LMDCustomControl, LMDCustomPanel, LMDCustomBevelPanel,
LMDBaseEdit, LMDCustomEdit, LMDCustomMaskEdit, LMDCalculatorEdit,
ElPgCtl, ElXPThemedControl,...
Forum: Programmieren allgemein
by Natcree,
10. Mär 2013
habe nen anderen button genommen kommt immer noch fehler
Forum: Programmieren allgemein
by Natcree,
9. Mär 2013
was ist hier falsch wenn ich in form7 mein Button zur eingabe mache dann schmeisst er mich mit fehler raus und vermeist mich auf if form7.showmodal = ...... raus hier mal der code
if Form7.Showmodal = mrOK then //diese Zeile wird blau markiert
begin
FObjects1.Add(Form7.Irgendwas1);
FGesamt1 := FGesamt1 + Form7.Irgendwas1.Summe1;
eltreestringgrid1.Cells :=...