

| návštěv dnes: | 27 |
| návštěv včera: | 59 |
| návštěv za měsíc: | 513 |
| návštěv celkem: | 17817 |
| tučná položka v TreeView |
|
|
| Napsal uživatel Administrator |
| Pátek, 05 Červen 2009 07:04 |
|
procedure SetNodeBoldState(Node: TTreeNode; Value: Boolean); var TVItem: TTVItem; begin if not Assigned(Node) then Exit; with TVItem do begin mask := TVIF_STATE or TVIF_HANDLE; hItem := Node.ItemId; stateMask := TVIS_BOLD; if Value then state := TVIS_BOLD else state := 0; TreeView_SetItem(Node.Handle, TVItem); end; end; Zdroj: http://www.zive.cz/Clanky/Tipy-a-triky-v-Delphi-dil-26/sc-3-a-104817/default.aspx
|


Založeno na Joomla!. Designed by: Free Joomla 1.5 Template, dns. Valid XHTML and CSS.