Einzelnen Beitrag anzeigen

franktron

Registriert seit: 11. Nov 2003
Ort: Oldenburg
1.446 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#1

FMX TCheckColumn keine Checkboxen

  Alt 20. Dez 2018, 11:43
Ich habe eine TStringgird mit einer TCheckColumn
Die Checkboxen werden aber erste wenn man sie markiert hat sichtbar (bleiben dann auch sichtbar egal ob check oder nicht)

Hier der Füllcode

Delphi-Quellcode:
StringGrid1.BeginUpdate;
  StringGrid1.RowCount:=Auftrage.Count;
  for i:=0 to Auftrage.Count-1 do
  Begin
    StringGrid1.Cells[0,i]:=BoolToStr(Auftrage.Items[i].LinkToERP);
    StringGrid1.Cells[1,i]:=Auftrage.Items[i].AuftragsNr;
    StringGrid1.Cells[2,i]:=Auftrage.Items[i].Kunde;
    StringGrid1.Cells[3,i]:=Auftrage.Items[i].Bez;
    StringGrid1.Cells[4,i]:=Auftrage.Items[i].LosNr;
    StringGrid1.Cells[5,i]:=Auftrage.Items[i].SN;
    StringGrid1.Cells[6,i]:=Auftrage.Items[i].PV;
    StringGrid1.Cells[7,i]:=DateToStr(Auftrage.Items[i].Liefertermin);
    StringGrid1.Cells[8,i]:=IntToStr(Auftrage.Items[i].ID);
  End;
  StringGrid1.EndUpdate;
  StringGrid1.Content.Repaint;
  Column_4.Repaint;
Was kann ich da machen
Frank
Tux sein Lieblingsquellcode
While anzfische<TuxSatt do begin
Fisch:=TFisch.Create; Tux.EssenFisch(Fisch); Fisch.Free;inc(anzfische); end;
  Mit Zitat antworten Zitat