Здравствуйте, уважаемые Эксперты. Сразу попрошу не смеяться с моих наивных вопросов по DELPHI 7. 1) Как провернуть следующую операцию я вобщем знаю, но думаю, что мой способ нерационален, а о правильном и рациональном способе хочу спросить у Вас : Как сделать так, чтобы после нажатия кнопки на одной форме ( Form1) появлялась бы другая форма ( Form2 ) . А при нажатии кнопки на второй форме ( Form2 ) закрывалось бы сразу всё приложение, состоящее из этих двух форм ? - Здесь меня интересуют только обработчики событий нажатия кнопок. 2) И второй вопрос : Как сделать так, чтобы после определённого количества событий прекратилось бы выполнение какой-либо процедуры ? Спасибо.
Доброе время суток, GeniusSoul! при нажатии кнопки на Form1 form2.show; при нажатии кнопки на Form2 form1.close;
Ответ отправлен: 04.10.2004, 10:36 Отправитель: Харланов Сергей Отвечает sir henry
Приветствую Вас, GeniusSoul! 1) В Form1.OnClick напишите: Form2.Show. Если у Вас Form1 главная, то завершение приложения произойдет при закрытии этой формы - Form1.Close. 2) После "определённого количества " определеного события или вообще без разницы каких? В первом случае в этом событии инкриментируйте какую-нибудь глобальную переменную и проверяйте ее значение на условие выхода. Во втором случае Вам скорее всего поможет ActionList. Ответ отправлен: 04.10.2004, 06:09 Отправитель: sir henry Отвечает Boriss
Доброе время суток, GeniusSoul! Смеяться и не подумаем :)) 1) Смотрите приложение (PostQuitMessage - приказывает всему приложению закрыться) 2) Думаю, что ясно из примера
Приложение: Ответ отправлен: 04.10.2004, 10:45 Отправитель: Boriss Отвечает CJ
Добрый день, GeniusSoul! 1) Formname.Show; Где Romname имя второй формы. А во втором обработчике кнопки пиши formname.close; Ответ отправлен: 04.10.2004, 16:30 Отправитель: CJ
Вопрос № 1831
Здравствуйте, уважаемые эксперты. 1. Пытаюсь программно создать БД, но постоянно вываливается ошибка: 'Error creating cursor handle'. Поскажите, что я делаю не правильно. Вот сам код:
procedure TForm1.Button1Click(Sender: TObject); Var Q: TQuery; begin Q:=TQuery.Create(Form1); DataSource1.DataSet:=Q; DBGrid1.DataSource:=DataSource1; Q.Close; Q.SQL.Clear; Q.SQL.Add('CREATE TABLE XXX.db '); Q.SQL.Add(' ( Number INTEGER, '); Q.SQL.Add(' Name CHAR(20), '); Q.SQL.Add(' Data DATE, '); Q.SQL.Add(' PRIMARY KEY (Number));'); Q.Open; Q.Free; end;
2. В нижней части редактора кода есть две закладочки Code и Diagram. Так для чего нужны эти диаграммы ??? Заранее большое спасибо !!! Гусев Сергей.
Доброе время суток, Гусев Сергей! 2) Посмотрите учебники - там подробно на нескольких страницах расписано. Например, возьмите недавно вышедшую книгу Михаила Фленова "Библия Delphi" (да и другие не хуже) 1) Вы стали жертвой красоты, видимо!!! Пробелы-то лишние зачем? Ответ отправлен: 04.10.2004, 17:26 Отправитель: Boriss Отвечает sir henry
Приветствую Вас, Гусев Сергей! 1) Q:=TQuery.Create(Form1) - Вы пытаетесь создать запрос, беря, почему-то, за образец форму Form1. Это чудовищно по отношению к запросу. Это тоже самое, как если бы Вы пытались сделать ботинки, взяв за образец авианосец. :) Правильнее будет так: Q:=TQuery.Create(TQuery). 2) В принципе, туда можно и не лазить (чисто мое мнение, не настаиваю). Ответ отправлен: 05.10.2004, 07:03 Отправитель: sir henry
Вопрос № 1832
Приветствую вас уважаемые эксперты. У меня следующий вопрос: В Win2000/XP существует возможность запускать приложение от имени другого пользователя. Как реализовать запуск приложения от имени другого пользователя из моей программы (Windows XP , Delphi7) Заранее большое спасибо.
Приветствую Вас, Funtik! Например CreateProcessAsUser или CreateProcessWithLogonW
* EMan1.5: ---===*** The game we play ***===---
Ответ отправлен: 05.10.2004, 23:59 Отправитель: Bob Johnson Отвечает THE_PRO
Доброе время суток, Funtik! Ishi v dokumentacii WinAPI po Win2000/WinXP Ответ отправлен: 05.10.2004, 13:56 Отправитель: THE_PRO
Форма отправки вопроса
Внимание!
Мы рекомендуем открывать рассылку в программе Internet Explorer 5.0+
или отправлять вопросы с сайта по адресу:
http://rusfaq.ru/cgi-bin/Message.cgi.