| Class TPalette_dlg (unit Paldlg) |
TForm
Most of this code is not useful, I used it under BPW and it is left here for one project I use it for, you can safely delete it.
| Constructors |
| Functions |
procedure FindAllPalettes(destlist:TStringList);
procedure FormCreate(Sender:TObject);
procedure OKBtnClick(Sender: TObject);
procedure Palette_ListClick(Sender: TObject);| Properties |
| Events |
| Variables |
Bevel1 : TBevel;
CancelBtn : TButton;
OKBtn : TButton;
Palette_List : TListBox;
Filename : string;| Constructors |
| Functions |
procedure FindAllPalettes(destlist:TStringList);
procedure FormCreate(Sender:TObject);
procedure OKBtnClick(Sender: TObject);fills a TStringlist with palettes - useful for listboxes
procedure Palette_ListClick(Sender: TObject);| Properties |
| Events |
| Variables |
Bevel1 : TBevel;
CancelBtn : TButton;
OKBtn : TButton;
Palette_List : TListBox;
Filename : string;