Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 10.12.2013, 19:45   #1
Ksenia177
Новичок
Джуниор
 
Регистрация: 10.12.2013
Сообщений: 1
По умолчанию работа с формами

Подскажите, пожалуйста, как сделать, чтобы при нажатии на соответствующую кнопку программа вызывала другую программу?
Код:
uses vcl;

//$VCLDESIGN+
var
  Form1: Form;
  TextLabel1: TextLabel;
  Button1: Button;
  Button2: Button;
//$VCLDESIGN-

procedure InitControls;
begin
  Form1:= Form.Create(0,0,380,338);
  Form1.InitControl(True,False,alNone,crDefault,clBtnFace,'Âõîä','');
  TextLabel1:= TextLabel.Create(Form1,144,48,38,17);
  TextLabel1.InitControl(True,True,alNone,crDefault,clBtnFace,'Êòî Âû?','');
  Button1:= Button.Create(Form1,200,96,75,25);
  Button1.InitControl(True,True,alNone,crDefault,0,'Ó÷åíèê','');
  Button2:= Button.Create(Form1,48,96,75,25);
  Button2.InitControl(True,True,alNone,crDefault,0,'Ó÷èòåëü','');
  Form1.Position:= poScreenCenter;
  Form1.Show;
end;
 procedure Button1OnClick;
begin
if Button1.OnClick then execute (generator\students_registration);
 end;

procedure Button2OnClick;
begin
if Button2.OnClick then execute (generator\password_for_teacher);
 end;
begin
  InitControls;

end.

Последний раз редактировалось Stilet; 10.12.2013 в 20:19.
Ksenia177 вне форума Ответить с цитированием
Старый 10.12.2013, 21:48   #2
ZX Spectrum-128
Участник клуба
 
Регистрация: 05.11.2013
Сообщений: 1,601
По умолчанию

WinExec() или ShellExecute
ZX Spectrum-128 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Работа с 2-мя формами Ангел без крыльев C# (си шарп) 3 11.04.2012 10:52
работа с формами маГГ85 PHP 6 16.01.2012 22:18
Работа с формами alexbad Visual C++ 1 25.12.2011 16:23
Работа с формами dscoma Microsoft Office Word 5 18.08.2010 14:09
Работа с формами HAMMAN Общие вопросы Delphi 1 26.04.2007 01:18