ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2
Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей. Здесь обсуждаются безопасность, программирование, технологии и многое другое. Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
Вернуться   Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

  #461  
Старый 09.08.2007, 15:33
Аватар для Ch3ck
Ch3ck
Познавший АНТИЧАТ
Регистрация: 09.06.2006
Сообщений: 1,359
Провел на форуме:
5301021

Репутация: 1879


По умолчанию

Цитата:
Подскажете как сделать чтобы при нажатии буттон открывался опен диалог.
Простой пример:
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
If OpenDialog1.Execute Then
Memo1.Lines.LoadFromFile(OpenDialog1.Filename);
end;
end.
Цитата:
убрать с опен диалога вкладки
По-моему нельзя их убрать...
 
Ответить с цитированием

  #462  
Старый 09.08.2007, 15:39
Аватар для infernal-team
infernal-team
Познающий
Регистрация: 04.07.2007
Сообщений: 56
Провел на форуме:
329032

Репутация: 8
По умолчанию

ВыДаеТ вот такие ошибки:

[Error] Unit4.pas(33): Undeclared identifier: 'Memo1'
[Error] Unit4.pas(33): Missing operator or semicolon
[Fatal Error] Project1.dpr(8): Could not compile used unit 'Unit4.pas'

В чем дело?
 
Ответить с цитированием

  #463  
Старый 09.08.2007, 15:40
Аватар для infernal-team
infernal-team
Познающий
Регистрация: 04.07.2007
Сообщений: 56
Провел на форуме:
329032

Репутация: 8
По умолчанию

Все разобрался эта строка лишняя - Memo1.Lines.LoadFromFile(OpenDialog1.Filename); !!!
 
Ответить с цитированием

  #464  
Старый 09.08.2007, 15:45
Аватар для NetMan
NetMan
Участник форума
Регистрация: 09.02.2004
Сообщений: 122
Провел на форуме:
1089794

Репутация: 134
По умолчанию

Код:
OpenDialog1.OptionsEx:=[ofExNoPlacesBar];
 
Ответить с цитированием

  #465  
Старый 09.08.2007, 15:54
Аватар для Piflit
Piflit
Banned
Регистрация: 11.08.2006
Сообщений: 1,522
Провел на форуме:
5128756

Репутация: 2032


Отправить сообщение для Piflit с помощью ICQ
По умолчанию

Цитата:
Сообщение от infernal-team  
По-моему нельзя их убрать...


Я видел в какойто программе. х3 может ты и прав.
вроде от системы зависит
 
Ответить с цитированием

  #466  
Старый 09.08.2007, 15:54
Аватар для infernal-team
infernal-team
Познающий
Регистрация: 04.07.2007
Сообщений: 56
Провел на форуме:
329032

Репутация: 8
По умолчанию

Цитата:
Сообщение от Dr.Check  
По-моему нельзя их убрать...
Видел в какойто программе, хотя х3 может ты и прав.
 
Ответить с цитированием

  #467  
Старый 09.08.2007, 15:56
Аватар для infernal-team
infernal-team
Познающий
Регистрация: 04.07.2007
Сообщений: 56
Провел на форуме:
329032

Репутация: 8
По умолчанию

А как сделать когда в опен диалоге выбираеш файл чтобы он был виден в едит. (тоесть полный путь для файла.
 
Ответить с цитированием

  #468  
Старый 09.08.2007, 15:59
Аватар для Ch3ck
Ch3ck
Познавший АНТИЧАТ
Регистрация: 09.06.2006
Сообщений: 1,359
Провел на форуме:
5301021

Репутация: 1879


По умолчанию

Сверхънаглость.
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then Edit1.Text:=OpenDialog1.FileName;
end;
end.
 
Ответить с цитированием

  #469  
Старый 09.08.2007, 16:11
Аватар для infernal-team
infernal-team
Познающий
Регистрация: 04.07.2007
Сообщений: 56
Провел на форуме:
329032

Репутация: 8
По умолчанию

Dr.Check + 1, большое спасибо !!!
 
Ответить с цитированием

  #470  
Старый 10.08.2007, 23:15
Аватар для PandoraBox
PandoraBox
Постоянный
Регистрация: 06.05.2007
Сообщений: 393
Провел на форуме:
1510937

Репутация: 398
Отправить сообщение для PandoraBox с помощью ICQ
По умолчанию

OpenDialog & SaveDialog на WinAPI как можно провернуть?
 
Ответить с цитированием
Ответ



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Wi-Fi, BT] Задай вопрос - получи ответ! Alexsize Беспроводные технологии/WPAN/WLAN 2564 06.04.2026 23:31
[ *NIX ] Задай вопрос - получи ответ. Xszz *nix 1547 15.06.2010 15:41
[jQuery] - Задай вопрос, получи ответ Isis PHP, PERL, MySQL, JavaScript 62 25.12.2009 03:25
ЕсТь ВоПрос Guma Чаты 4 26.10.2005 21:48



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ