mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-10-14 09:36:16 +02:00
lazcontrols: shortpathedit: fixed visibility
git-svn-id: trunk@56633 -
This commit is contained in:
parent
913451674b
commit
19a4058156
@ -21,8 +21,8 @@ type
|
||||
FOnAcceptDir: TAcceptFileNameEvent;
|
||||
protected
|
||||
function CreateDialog: TCommonDialog; override;
|
||||
procedure RunDialog; override;
|
||||
published
|
||||
procedure RunDialog; override;
|
||||
property Directory: String read FDirectory write FDirectory;
|
||||
property OnAcceptDirectory: TAcceptFileNameEvent read FOnAcceptDir write FonAcceptDir;
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user