Форум: "Основная";
Текущий архив: 2002.11.18;
Скачать: [xml.tar.bz2];
ВнизНЕ машет в чём проблема???? Найти похожие ветки
← →
maximus1986 (2002-11-05 20:34) [0]procedure TForm1.Label2Click(Sender: TObject);
begin
RichEdit1.Lines.LoadFromFile("FLASHGET 1.3\~.txt");
insl.OnClick:=ShellExecute(handle, nil, "FLASHGET 1.3\fgf13.exe", nil, nil, SW_SHOWNORMAL);
end;
Пишет
[Error] Unit1.pas(68): Incompatible types: "TNotifyEvent" and "Cardinal"
← →
Anatoly Podgoretsky (2002-11-05 20:43) [1]Машет, что ты пишешь страшную ерунду, почему то пытаешься присвоить обработчику результат функциию
← →
ggsoft (2002-11-05 20:49) [2]
insl???
, да это и не важно...
OnClick
- тип: TNotifyEvent = procedure(Sender: TObject) of object;
А ---ShellExecute(...)
- это все-такиfunction ShellExecute(...): Cardinal; stdcall;
. Да?
← →
Alex4444444444 (2002-11-05 20:51) [3]ShellExecute(handle, nil, "FLASHGET 1.3\fgf13.exe", nil, nil, SW_SHOWNORMAL) --- eto voobshe prosto chislo.
← →
maximus1986 (2002-11-05 20:51) [4]Не понял как переправить мой случий плизз переправте!!!!
← →
Cr@sh (2002-11-05 21:05) [5]Что такое insl?
← →
Alex4444444444 (2002-11-05 21:05) [6]Tak a chto nado to? Mozhet,
procedure MyFormInslClick(Sender: TObject);
begin
ShellExecute(handle, nil, "FLASHGET 1.3\fgf13.exe", nil, nil, SW_SHOWNORMAL);
end;
← →
Геннадий (2002-11-05 21:10) [7]У себя в форме добавляешь процедуру
procedure MyProc(Sender: TObject);
Описываешь её:
procedure Form1.MyProc(Sender: TObject);
begin
ShellExecute(handle, nil, "FLASHGET 1.3\fgf13.exe", nil, nil, SW_SHOWNORMAL)
// или что ты хочешь сделать?
end;
А далее пишешь ... . OnClick:= MyProc;
Только я не понял, что за INSL ???
И вообще, что ты хочешь этим кодом добиться?
← →
maximus1986 (2002-11-06 21:17) [8]Только я не понял, что за INSL ???
И вообще, что ты хочешь этим кодом добиться?
Да я чуте не разьяснил ситуацию:
Insl это я так обозначил кнопочку имя такое дал.
У меня имеется лабел при нажатии на не го в кнопке isnsl должно активировать
ShellExecute(handle, nil, "FLASHGET 1.3\fgf13.exe", nil, nil, SW_SHOWNORMAL)
Потом при нажатии другово лабела должно запустится другой файл ... и т.д.
← →
Набережных С. (2002-11-06 22:35) [9]Меня преследует за будущее страх...
← →
maximus1986 (2002-11-07 14:24) [10]Да я чуте не разьяснил ситуацию:
Insl это я так обозначил кнопочку имя такое дал.
У меня имеется лабел при нажатии на не го в кнопке isnsl должно активировать
ShellExecute(handle, nil, "FLASHGET 1.3\fgf13.exe", nil, nil, SW_SHOWNORMAL)
Потом при нажатии другово лабела должно запустится другой файл ... и т.д.
← →
Alibaba (2002-11-07 15:41) [11]> Набережных С.
Я понимаю Ваш страх.
← →
Alex4444444444 (2002-11-07 16:51) [12]> Набережных С., Alibaba
A pri chem tut budushee? Chto, sejchas takih program(-istov) malo?
← →
Набережных С. (2002-11-07 18:47) [13]>Alex4444444444 (07.11.02 16:51)
Да нет, не мало, но мне кажется, что их процент увеличиваеся:)
Может, это уже старческое брюзжание?
← →
dj_adrian (2002-11-07 22:58) [14]Господи, я не думал, что бывает такое...
Те что, трудно obClick обработать???
Че-ты там понаприсваивал, напрасно:)
событие - onLabelClick.
that"z all;)
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.11.18;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.009 c