Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Не работает SaveDialog1.Execute. Help [D5, Win95/98, Win2k]


Борис ©   (2002-09-23 09:20:00) 

Всем привет! Вот такие дела, вчера дома пытаюсь запустить SaveDialog1.Execute, не работает. Смотрю, как в других проектах запускал - также и работало. Шрешу на Win2k. Приходу на работу, собираю/компилирую на Win98, фиг, все-равно не работает. Даже не пойму почему ...

Вот код:
if RadioButton4.Checked=True then
begin
dir:=ExtractFilePath(Application.EXEName);

savedialog1.InitialDir:=dir;
savedialog1.FileName:="Текстовые файлы|*.txt";

if SaveDialog1.Execute then
begin
urlp:= Savedialog1.FileName;
if fileExists(urlp) then
deletefile(urlp);
showmessage(urlp);
end;
end;

Но косяк, SaveDialog1.Execute возвращает ложь, однако само окно диалога даже не появляется!


Борис   (2002-09-23 09:31:00) [1]

to MBo ©
Спасибо, это надо было так лохануться!!! Еще раз спасибо

P.S. Не пейте, когда что-то пишете, потом хрен разберете.


MBo   (2002-09-23 09:26:00) [2]

savedialog1. Filter:="Текстовые файлы|*.txt";


Наверх

Титульная страница Поиск, карта сайта Написать письмо