AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein GUI-Design mit VCL / FireMonkey / Common Controls Delphi TChecklistbox : einzelne Zeilen ohne Checkbox?
Thema durchsuchen
Ansicht
Themen-Optionen

TChecklistbox : einzelne Zeilen ohne Checkbox?

Ein Thema von Bufo · begonnen am 24. Feb 2008 · letzter Beitrag vom 5. Jul 2008
Antwort Antwort
Bufo

Registriert seit: 7. Mai 2006
27 Beiträge
 
#1

TChecklistbox : einzelne Zeilen ohne Checkbox?

  Alt 24. Feb 2008, 21:07
Hallo,

kennt jemand eine Möglichkeit, bei einer Checklistbox bei einzelnen Zeilen die vorangestellten check-Boxen auszublenden?

Danke vorab!
  Mit Zitat antworten Zitat
omata

Registriert seit: 26. Aug 2004
Ort: Nebel auf Amrum
3.154 Beiträge
 
Delphi 7 Enterprise
 
#2

Re: TChecklistbox : einzelne Zeilen ohne Checkbox?

  Alt 24. Feb 2008, 21:12
Das wird nicht gehen, da die interne Liste von TStrings angeleitet ist.

Du könntest einen TreeView mit nur einer Ebene nehmen und dort Checkboxen als Bilder einfügen. Dann könnte das gehen.

Gruss
Thorsten
  Mit Zitat antworten Zitat
Benutzerbild von OldGrumpy
OldGrumpy

Registriert seit: 28. Sep 2006
Ort: Sandhausen
941 Beiträge
 
Delphi 2006 Professional
 
#3

Re: TChecklistbox : einzelne Zeilen ohne Checkbox?

  Alt 5. Jul 2008, 17:21
Das geht schon, dazu gibts das Property Header. Zeilen für die Header true ist, werden ohne Checkbox und in anderen Farben dargestellt (HeaderColor und HeaderBackgroundColor). Sehr nützlich
"Tja ja, das Ausrufezeichen... Der virtuelle Spoiler des 21. Jahrhunderts, der Breitreifen für die Datenautobahn, die k3wle Sonnenbrille fürs Usenet. " (Henning Richter)
  Mit Zitat antworten Zitat
Benutzerbild von _frank_
_frank_

Registriert seit: 21. Feb 2003
Ort: Plauen / Bamberg
922 Beiträge
 
Delphi 3 Professional
 
#4

Re: TChecklistbox : einzelne Zeilen ohne Checkbox?

  Alt 5. Jul 2008, 18:01
gut, bei D3 gibts das Property "Header" noch nicht. ich hab damals per ownerdraw die chekboxen übermalt

nur fix rauskopiert

Delphi-Quellcode:
procedure TForm_TsctMain.ChkLB_FoldFlagsDrawItem(Control: TWinControl;
  Index: Integer; Rect: TRect; State: TOwnerDrawState);
var r:TRect;
begin
  r:=rect;
  if ChkLB_FoldFlags.items[index]='then
  begin
    rect:=classes.rect(0,rect.top,rect.right,rect.bottom);
    ChkLB_FoldFlags.Checked[index]:=false;
    ChkLB_FoldFlags.canvas.Brush.Color:=ChkLB_FoldFlags.color;
  end;
  //if (odSelected in State) and (ChkLB_FoldFlags.items[index]<>'') then ChkLB_FoldFlags.canvas.Brush.color:=clGreen;
  ChkLB_FoldFlags.canvas.FillRect(rect);
  if (odfocused in state) then
    ChkLB_FoldFlags.canvas.Rectangle(r.left,r.top,r.right,r.bottom);
  ChkLB_FoldFlags.canvas.TextOut(rect.left+2,rect.top+1,ChkLB_FoldFlags.items[index]);
end;
Gruß Frank
  Mit Zitat antworten Zitat
Benutzerbild von OldGrumpy
OldGrumpy

Registriert seit: 28. Sep 2006
Ort: Sandhausen
941 Beiträge
 
Delphi 2006 Professional
 
#5

Re: TChecklistbox : einzelne Zeilen ohne Checkbox?

  Alt 5. Jul 2008, 18:14
Der Fred-ersteller hat ja leider keine Delphiversion angegeben, ich kann da nur für mich bzw. meine Version sprechen *g*
"Tja ja, das Ausrufezeichen... Der virtuelle Spoiler des 21. Jahrhunderts, der Breitreifen für die Datenautobahn, die k3wle Sonnenbrille fürs Usenet. " (Henning Richter)
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:23 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz