Subject | "2-nd time thru" problems |
---|---|
Author | Phil Henningsen |
Post date | 2001-08-13T06:58:36Z |
I have several instances of what I characterize as "2-nd time thru"
problems. Meaning that it works the "first time", and doesn't work thereafter.
Am I missing something "big" here?
Here is a typical example:
I have the following:
procedure TdmData.ThorClearingQueryAfterOpen(IB_Dataset: TIB_Dataset);
begin
with ThorClearingQuery do
begin
FieldByName('Debit_Or_Credit').OnGetText := fmMain.GetTextDbCrIBO;
FieldByName('Card_Type').OnGetText := fmMain.GetTextCardTypeIBO;
end;
end;
Assuming that "GetTextDbCrIBO" knows how to translate 'D' into 'Debit' and
'C' into 'Credit' and that "GetTextCardTypeIBO" knows the difference
between Visa, MasterCard, etc.
what I get looks like: (portions omitted)
Row Db/Cr Card Type
1 Debit Visa
2 D 4
3 C 4
That is, the "GetText" works on the FIRST row, and NOT thereafter.
Thanks again!
Phil Henningsen
problems. Meaning that it works the "first time", and doesn't work thereafter.
Am I missing something "big" here?
Here is a typical example:
I have the following:
procedure TdmData.ThorClearingQueryAfterOpen(IB_Dataset: TIB_Dataset);
begin
with ThorClearingQuery do
begin
FieldByName('Debit_Or_Credit').OnGetText := fmMain.GetTextDbCrIBO;
FieldByName('Card_Type').OnGetText := fmMain.GetTextCardTypeIBO;
end;
end;
Assuming that "GetTextDbCrIBO" knows how to translate 'D' into 'Debit' and
'C' into 'Credit' and that "GetTextCardTypeIBO" knows the difference
between Visa, MasterCard, etc.
what I get looks like: (portions omitted)
Row Db/Cr Card Type
1 Debit Visa
2 D 4
3 C 4
That is, the "GetText" works on the FIRST row, and NOT thereafter.
Thanks again!
Phil Henningsen