Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: [erledigt] CheckBox in Stringgrid

    Delphi
    by Hansa, 17. Mär 2006
  Stop, der Kopf ist zu wenig. Da gibts noch lästige Hürden. Hier ist das wichtige (aus OnDrawCell !) :
  
  if ACol in CheckBoxCols then begin
  if StrToInt (sg.Cells ) = 1 then begin
  DrawRect:=Rect;
  InflateRect(DrawRect,-1,-1);
  DrawState := ISChecked) = 1];
  // ^ die 0/1, die aus dem DB-Original in sg steht beeinflusst, ob die
  // CheckBox...
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: [erledigt] CheckBox in Stringgrid

    Delphi
    by Hansa, 16. Mär 2006
  Jo, das Beispiel ist wirklich zu mager. So ungefähr muß es aber aussehen. Das ist die Stelle, die bei Dir wohl Ärger macht :
  
  procedure Tfrm.sgDrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
  const IsChecked : array of Integer =
  (DFCS_BUTTONCHECK, DFCS_BUTTONCHECK or DFCS_CHECKED);
  var DrawState: Integer;
  DrawRect: TRect;
  begin
  inherited;
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: CheckBox in Stringgrid

    Delphi
    by Hansa, 13. Jan 2006
  Das habe ich doch alles schon gesehen. :-D Die Checkbox ist anders ! Aber egal. Gezeichnet war sie ja vorher sowieso richtig. Habe es jetzt so gemacht :
  
  procedure Tfrm.sgClick(Sender: TObject);
  begin
  inherited;
  if sg.Col in BoolCols then begin
  if StrVorhanden (sg.Cells ) then begin
  if StrToInt (sg.Cells ) = 1 then
  sgr.Cells := '0'
  else
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: CheckBox in Stringgrid

    Delphi
    by Hansa, 13. Jan 2006
  Oh je. Das wird noch komplizierter. Habe das jetzt so gemacht :
  if ACol in BoolCols then begin
  DrawRect:=Rect;
  InflateRect(DrawRect,-1,-1);
  DrawState := ISChecked) = 1];
  sg.Canvas.FillRect(Rect);
  DrawFrameControl(sgArtNr.Canvas.Handle, DrawRect,DFC_BUTTON, DrawState);
  
  Wenn ich das richtig dehe, dann sind die Checkboxen lediglich...
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: CheckBox in Stringgrid

    Delphi
    by Hansa, 13. Jan 2006
  Auf der Form ist eine einzige Checkbox. Und die wird allerdings immer wieder mit veränderten Koordinaten angezeigt.
  
  @roter Kasten Schlaumeier :mrgreen: bei mir ist da nicht.
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  [erledigt] CheckBox in Stringgrid

    Delphi
    by Hansa, 12. Jan 2006
  Hi,
  
  ich habe in eine Spalte eines Stringgrids Checkboxen eingebaut. Im OnDrawCell übergebe ich hierzu die Koordinaten der Stringgrid Zellen (Rect) an die Checkboxen, damit sie genau reinpassen. Nun werden sie allerdings immer wieder neu gezeichnet => flackern. Allerdings habe ich in dem Grid ganz andere Sachen drin (in Abhängigkeit des Zellinhalts umfärben, rechtsbündige Darstellung bei...