IHH!!

Tags:    delphi


Hvad kan der være galt her ?? Den tæller åbenbart KUN den første record, jeg har 3 records i test-programmet.

<pre> for I := 0 to Form2.Table1.RecordCount do begin
if Form2.DeletedRecords = True then begin
end else begin
Form2.Table1.FindFirst;
dag_min := (StrToInt(copy(Form2.Table1.Fields[7].AsString, 0, 2)) * 60 + StrToInt(copy(Form2.Table1.Fields[8].AsString, 4, 2)));
end;
Form2.Table1.MoveBy(i);
end;
</pre>

Mark H. Jensen
mouzulu@hotmai.com
www.freewebs.com/mhj/



1 svar postet i denne tråd vises herunder
0 indlæg har modtaget i alt 0 karma
Sorter efter stemmer Sorter efter dato
Jeg har ikke lige prøvet men mon ikke du skulle slette findFirst'en og flytte moveBy(i) op til linien før du henter fra recorden ? !!! Du har findFirsten inde i loopet som skulle løbe rækken af records igennem ! (?) Det giver sig selv, men der kan selvfølgelig være andre fejl.
Lige en ting til; tag dog og test på om record-sættet er tomt FØR du begynder loop'et, det er god skik.
Martin.
[Redigeret d. 28/10-02 11:00:17 af Martin Klausen Andersen]



t