OpenDirDialog

[FAlter]

Hi,

Delphi-Quellcode:

Procedure TOpenDirDialog.OpenDirDlgResize(Sender: TObject);
var
  Oben  : Integer;
  Unten : Integer;
begin
  if OpenDirDlg.Visible
  then begin
...
    Bu_NewFolder.SetBounds(FWidth - 101, FHeight - 31, 95, 25); // <--- !!! Da krachts, wenn es keinen Bu_NewFolder gibt!
  end;
end;

Die AV sollte noch weg.

Mfg
FAlter