Thema: Delphi DBGrid1DrawColumnCell

Einzelnen Beitrag anzeigen

Benutzerbild von ffomoon
ffomoon

Registriert seit: 1. Sep 2003
Ort: Frankfurt (Oder)
34 Beiträge
 
#1

DBGrid1DrawColumnCell

  Alt 21. Okt 2003, 09:51
Hallo,

ich hab mit einer DBGrid1DrawColumnCell procedure zusätzlich spalten in ein DBGrid eingefügt ...

Delphi-Quellcode:
  
if (Column.FieldName='USERNr') and
   (Column.Title.Caption=NAME) then
  begin
  DBGridLog.Canvas.FillRect(Rect);
   XInx1:=PCBUserNrListe.IndexOf(Column.Field.AsString);
    if XInx1 > -1 then
    Clip1:=PCBUserListe[Xinx1]
    else
    Clip1:='Unbekannt';
    DBgridLog.Canvas.TextOut(Rect.Left+1,Rect.Top+1, Clip1 );
  end else
  DBGridLog.DefaultDrawColumnCell(Rect,DataCol,Column,State);
... das klappt soweit bis auf eine weitere splate die hinzu soll!
Ich verwende eine paradox DB und das feld das noch mitrein soll ist als einziges alphanumerisch!
(ausserdem auf 12 zeichen begrenzt)
kann es sein das es daran liegt!? und wenn ja warum??
wäre toll wenn mir einer einen tipp geben kann wie ich das lösen könnte!!!

mfg moon
  Mit Zitat antworten Zitat