Thema: Delphi DevExpress Quantum Grid

Einzelnen Beitrag anzeigen

Gernot Huber

Registriert seit: 26. Mai 2011
Ort: Dülmen
13 Beiträge
 
Delphi 2010 Professional
 
#2

AW: DevExpress Quantum Grid

  Alt 17. Jun 2011, 12:35
Hallo Hans,

über die einfache Zuweisung eines ImageIndex geht es meines Wissens nach nicht.

Wenn Du nicht die ImageComboBoxEdit verwenden möchtest, mußt Du die Images über den Event OnCustomDrawCell der Spalte selbst zeichen.

Hier ein Beispiel in dem je nach RecordIndex ein Image in die Zelle gezeichnet wird:

Delphi-Quellcode:
procedure TForm2.ImageColumnCustomDrawCell(
  Sender: TcxCustomGridTableView; ACanvas: TcxCanvas;
  AViewInfo: TcxGridTableDataCellViewInfo; var ADone: Boolean);
begin
  if (AViewInfo.GridRecord.RecordIndex >= 0) and
     (AViewInfo.GridRecord.RecordIndex < cxImageList.Count) then
  begin
    cxImageList.Draw(ACanvas.Canvas,
                     AViewInfo.ContentBounds,
                     AViewInfo.GridRecord.RecordIndex,
                     false,
                     false,
                     true);
    ADone := true;
  end;
end;
Gruß

Gernot

Geändert von Gernot Huber (17. Jun 2011 um 12:44 Uhr)
  Mit Zitat antworten Zitat