Вопрос: помогите с Common Dialog | Добавлено: 16.01.07 16:38 |
Автор вопроса: ![]() |
Ответы | Всего ответов: 32 |
Номер ответа: 16 Автор ответа: ![]() ![]() ![]() ![]() ICQ: 496782368 Вопросов: 18 Ответов: 312 |
Web-сайт: Профиль | Цитата | #16 | Добавлено: 16.01.07 22:18 |
Может оно тебе и не надо сейчас![]() ![]() ![]() С ув.Alex |
Номер ответа: 17 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ICQ: 295725312 Вопросов: 53 Ответов: 830 |
Web-сайт: Профиль | Цитата | #17 | Добавлено: 16.01.07 22:19 |
пока писал кое что ответили и тем неменее
Option Explicit
Private Declare Function ShellExecute& Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) Private Sub Command1_Click() CommonDialog1.ShowOpen Call ShellExecute(0, "Open", CommonDialog1.FileName, "", "c:\", 1) End Sub |
Номер ответа: 18 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ICQ: 295725312 Вопросов: 53 Ответов: 830 |
Web-сайт: Профиль | Цитата | #18 | Добавлено: 16.01.07 22:27 |
villain копируй и пользуйся, а у меня кальян блин
пока писал потух. |
Номер ответа: 19 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Вопросов: 1 Ответов: 8 |
Профиль | Цитата | #19 | Добавлено: 16.01.07 22:45 |
Боцман(и все остальные),спасибо! запустил - то,что хотел,а курить вредно!.. |
Номер ответа: 20 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ICQ: 295725312 Вопросов: 53 Ответов: 830 |
Web-сайт: Профиль | Цитата | #20 | Добавлено: 16.01.07 22:49 |
а курить вредно!..
жить тоже от этого умирают |
Номер ответа: 21 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Вопросов: 1 Ответов: 8 |
Профиль | Цитата | #21 | Добавлено: 16.01.07 23:47 |
а че при выборе "отмена" в CD открывается диск "с:",че надо добавить |
Номер ответа: 22 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Вопросов: 1 Ответов: 8 |
Профиль | Цитата | #22 | Добавлено: 16.01.07 23:47 |
а че при выборе "отмена" в CD открывается диск "с:",че надо добавить |
Номер ответа: 23 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ICQ: 295725312 Вопросов: 53 Ответов: 830 |
Web-сайт: Профиль | Цитата | #23 | Добавлено: 17.01.07 00:06 |
Option Explicit
Private Declare Function ShellExecute& Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) Private Sub Command1_Click() On Error GoTo Cansel CommonDialog1.CancelError = True CommonDialog1.ShowOpen Call ShellExecute(0, "Open", CommonDialog1.FileName, "", "c:\", 1) Cansel: ' Если нажата Cansel, выходим из процедуры If Err.Number = cdlCancel Then Exit Sub End If End Sub |
Номер ответа: 24 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Вопросов: 1 Ответов: 8 |
Профиль | Цитата | #24 | Добавлено: 17.01.07 00:52 |
пасибо,моряк! ![]() |
Номер ответа: 25 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Вопросов: 1 Ответов: 8 |
Профиль | Цитата | #25 | Добавлено: 17.01.07 01:54 |
боцман ты еще тут? есть ?-ы |
Номер ответа: 26 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() Вопросов: 61 Ответов: 471 |
Web-сайт: Профиль | Цитата | #26 | Добавлено: 17.01.07 09:13 |
жить тоже от этого умирают
Жизнь это такая болезнь, каторая передаётся половым путём, она очень опасна-из неё ещё не кто не выходил живым |
Номер ответа: 27 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Лидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979 |
Web-сайт: Профиль | Цитата | #27 | Добавлено: 17.01.07 16:44 |
Торопить события, тем не менее, не стоит. |
Номер ответа: 28 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ICQ: 295725312 Вопросов: 53 Ответов: 830 |
Web-сайт: Профиль | Цитата | #28 | Добавлено: 17.01.07 20:53 |
Это точно.
Кто не курит и не пъет тот здоровеньким помрет! |
Номер ответа: 29 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() Вопросов: 61 Ответов: 471 |
Web-сайт: Профиль | Цитата | #29 | Добавлено: 17.01.07 22:01 |
Курить - вредно, пить - противно, а умирать здоровым впадлу. |
Номер ответа: 30 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Лидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979 |
Web-сайт: Профиль | Цитата | #30 | Добавлено: 18.01.07 05:08 |
Не бойтесь, здоровыми люди не помирают вообще. У абсолютно любого умершего человека смерть была вызвана физиологическими причинами. |
|