Обновить список дисков TDriveComboBox с сетевыми дсками и Plug&Play

Советы » Диски » Обновить список дисков TDriveComboBox с сетевыми дсками и Plug&Play

type   //это наш "class cracer"   TNewDriveComboBox = class(TDriveComboBox) end;

procedure TForm1.Button1Click(Sender: TObject); var
  Drive : char;
begin
  Drive := DriveComboBox1.Drive;   //вызываем защищенный метод родительского класса
  TNewDriveComboBox(DriveComboBox1).BuildList;   DriveComboBox1.Drive := Drive;  

Другое по теме:

Категории

Статьи

Советы

Copyright © 2023 - All Rights Reserved - www.delphirus.com