Hallo,
die Variable TABSTable von ABSTable1 im Datenmodul wird auf TDemoForm nicht erkannt. Wer hilft bitte?
Delphi-Quellcode:
procedure TDemoForm.StringGridDrawCell(Sender: TObject; ACol,
ARow: Integer; Rect: TRect; State: TGridDrawState);
var
s: String;
t: TABSTable; => Fehlermeldung: Undef.Bezeichner 'TABSTable'
begin
t := ABSTable;
with Sender as TStringGrid do
begin
if ARow = 0 then
s := Cells[ACol, ARow] else
if t.Active then
begin
t.RecNo := ARow;
s := t.Fields[ACol].AsString;
end else s := '';
...
Gruß
Lombi