[Devils Night]

достаточно нажать на новой кнопке два раза, либо выбрать в инспекторе объектов (с правой стороны) вкладку Events, там будут все поддерживаемые процедуры для этой кнопки. »

Что-то до меня туговато доходит! Примерчик можно? Вот хотя бы на примере SelectDirPage, нужно к примеру чтобы FolderTreeView действовала в DirEdit, т.е при выборе директории в FolderTreeView, путь менялся и в DirEdit, как это сделать?

читать дальше »

Код:

[ Code]
{ RedesignWizardFormBegin } // Не удалять эту строку!
// Не изменять эту секцию. Она создана автоматически.
var
  FolderTreeView1: TFolderTreeView;

procedure RedesignWizardForm;
begin
  { FolderTreeView1 }
  FolderTreeView1 := TFolderTreeView.Create(WizardForm);
  with FolderTreeView1 do
  begin
    Name := 'FolderTreeView1';
    Parent := WizardForm.SelectDirPage;
    Left := ScaleX(0);
    Top := ScaleY(112);
    Width := ScaleX(332);
    Height := ScaleY(97);
    Cursor := crArrow;
  end;

  FolderTreeView1.TabOrder := 5;

{ ReservationBegin }
  // Вы можете добавить ваш код здесь.

{ ReservationEnd }
end;
// Не изменять эту секцию. Она создана автоматически.
{ RedesignWizardFormEnd } // Не удалять эту строку!

procedure InitializeWizard();
begin
  RedesignWizardForm;
end;