Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.01.23;
Скачать: CL | DM;

Вниз

OpenDialog   Найти похожие ветки 

 
Ищущий ответ   (2005-01-09 19:24) [0]

Возможно ли сделать так чтобы в открывшимся OpenDialog пользователь не смог выбрать другую директорию? Возможно ли это?


 
Семен Сорокин ©   (2005-01-09 22:04) [1]

а смысл вообще открывать диалог?


 
Семен Сорокин ©   (2005-01-09 22:05) [2]

Options := Options + [ofNoChangeDir];


 
begin...end ©   (2005-01-09 22:08) [3]

> [1] Семен Сорокин ©   (09.01.05 22:04)

Выбрать файл в текущем каталоге?

> [2] Семен Сорокин ©   (09.01.05 22:05)

Это не совсем то. Перемещение по каталогам остаётся возможным.

> Ищущий ответ   (09.01.05 19:24)

AFAIK, используя стандартный TOpenDialog - нельзя.


 
ASoft   (2005-01-10 05:08) [4]

В качестве не совсем серьезного примера:
var od: boolean;

procedure TForm1.Button1Click(Sender: TObject);
begin
od:=False;
With OpenDialog1 do
 begin
  InitialDir:="C:\myfolder";
  If not Execute then exit;
  If od then
   begin
    ShowMessage("Незьзя отсюдова выбирать, можно только "+"C:\myfolder!");
    exit;
   end;
 end;
end;

procedure TForm1.OpenDialog1FolderChange(Sender: TObject);
begin
if OpenDialog1.InitialDir<>OpenDialog1.FileName then
 od:=True;
end;


 
ASoft   (2005-01-10 05:19) [5]

Дописать в процедуре  TForm1.Button1Click(Sender: TObject) перед  InitialDir:="C:\myfolder";
FileName:="";



Страницы: 1 вся ветка

Текущий архив: 2005.01.23;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.055 c
3-1103699315
Guitar
2004-12-22 10:08
2005.01.23
Как сохранить из DBGrid?


3-1103479113
SergP
2004-12-19 20:58
2005.01.23
SQL. Можно ли использ. знач. поля одной табл. как имя другой?


3-1103614507
Dim!S
2004-12-21 10:35
2005.01.23
2 копии отчета на одной странице


14-1104841832
by
2005-01-04 15:30
2005.01.23
Новый Год в Киеве. Маленький фоторепортаж.


1-1104333606
saNat
2004-12-29 18:20
2005.01.23
Дерево потоков.