Einzelnen Beitrag anzeigen

plautzer

Registriert seit: 23. Aug 2003
172 Beiträge
 
#5

Re: Tabellen springen zum letzten Datensatz, warum?

  Alt 23. Jun 2004, 20:19
Ja, das steht alles in Formcreate.
Ich sehe auch ein, dass das was ich hier mache nicht viel sinn, rein vom lernen her macht, aber das ist eben Schule. Uns wurde vor gut 2 wochen gesagt, das wir ein programm programmieren sollen mit Beschreibung struktogramm etc... . Das wäre ja alles kein Thema, aber da es zum jahresende immer noch stressiger und jeder noch schnell was aufgeben will, das bremst den Elan und somit die Ausführung gewaltig..naja und bis morgn muss es fertsch sein.Nun aber zum programm:

Ich habe den Fehler fürs das springen des datensatzes gefunden:

Delphi-Quellcode:
procedure TMietverwaltung.brutto_summe;
var bru_su:currency;
a:integer;
begin
bru_su:=0.0;
  while Not Table1.EOF do
  begin
    bru_su := bru_su +Table1.FieldByName('Bruttomiete').AsFloat;
    table1.Next;
  end;
dbtext3.Caption := Format('%8.2f', [bru_su])+'';
a:=table1.RecordCount;
dbtext2.Caption:=inttostr(a);
end
Es soll jeweils die summe einer Spalte (miete) ermittelt werden, ich weiss aber nicht wie ich das anders machen soll als oben. Habt ihr ne idee?

Wenn man eine doppelte ID eingibt, dann sagt der erst was beim speichern, ... d.h. bei mit zumindest, das ein fehlermeldung kommt und ab da an spinnt das programm, es wir eine datensatz ohne ID, also leer, erstellt und ab da hat man verloren, mann muss alle daten löschen bevor man das leere feld wegbekommt.

Plautzer
  Mit Zitat antworten Zitat