[audiofeel]

El Sanchez,
просто отлично, все работает, только как теперь быть с лейблом "требуется место...." , он у меня менял цвет при нехватке

Скрытый текст

Код:

procedure DirEditOnChange(Sender: TObject);
var
  FreeMB, TotalMB: cardinal;
begin
  GetSpaceOnDisk(ExtractFileDrive(WizardForm.DirEdit.Text), True, FreeMB, TotalMB);
  NeedSizeLbl.Caption:= ExpandConstant('{cm:NeedSize1} ' + MbOrTb({#NeedSize}) + ' {cm:NeedSize2}')
  if (FreeMB<{#NeedSize}) then NeedSizeLbl.Font.Color:= clRed else
    NeedSizeLbl.Font.Color:= clWhite;
end;