Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi DBGrid1DrawColumnCell (https://www.delphipraxis.net/10563-dbgrid1drawcolumncell.html)

ffomoon 21. Okt 2003 10:51


DBGrid1DrawColumnCell
 
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


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:30 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz