Registriert seit: 1. Nov 2003
Ort: Denmark, Lolland, Marielyst
280 Beiträge
Delphi 7 Enterprise
|
Re: PageControl , Ereignis wenn neue TabSheet angeklickt wur
3. Mai 2004, 20:19
Delphi-Quellcode:
procedure TMainForm.ResetLV;
begin
if (LVExts.ViewStyle = vsReport) then
LVExts.Columns.Clear;
if (LVExts.LargeImages.Count > 0) then
LVExts.LargeImages.Clear;
if (LVExts.SmallImages.Count > 0) then
LVExts.SmallImages.Clear;
LVExts.Clear;
end;
danke!
Mastdarmpapillenentzündung ist cool
|