| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Процедуры [D7, Win95/98, WinXP]
Shadow-st © (2004-11-08 18:14:00)Здравствуйте!
Как вынести процедуры программы в отдельный *.pas?
Poirot (2004-11-09 18:33:00) [1]<offtop>
Shadow-st (09.11.04 18:16) [4]
Моя плакать. :)
А ешшо как назвался-то:))))
</offtop>
Учи мат часть.
А по правильному как в книждках ешшо копирайты надо на суперпупер процедуру + описание модуля и параметров подпрограмм:)
Pentium133 (2004-11-09 18:27:00) [2]можно так:
файл proc.pas:
procedure MyProc
begin
......
end;
основная программа
{$I proc.pas}
icWasya (2004-11-09 18:26:00) [3]1)
File->New ->Unit
2)
File->SaveAs
MyGlobalUnit // например
3)
Unit MyGlobalUnit;
interface
var
MyVar1:Integer;
function MyProc(Param1:Integer):Integer;
implementation
uses
Unit1; // - например
function MyProc(Param1:Integer):Integer;
begin
if Param1=1 then
Result:=Form1.Showmodal
else Result:=-1;
end;
end.
Reindeer Moss Eater (2004-11-09 18:22:00) [4]File->New->Unit
Тоже не катит?
Shadow-st (2004-11-09 18:16:00) [5]Шутники...Тупость юмора отражает степень ваших мозгов.
То,что вы сказали я знал. Я спросил как оформить этот *.pas как вызвать правильно оттуда процедуру.
Sphinx (2004-11-08 19:41:00) [6]Убрать вначале TForm1. или аналог и перенести все используемые глобальные переменные (если есть) в строку вызова, ну а потом естественно
> Anatoly Podgoretsky © (08.11.04 19:28) [2]или > YurikGL © (08.11.04 18:18) [1]
Anatoly Podgoretsky (2004-11-08 19:28:00) [7]Нет
cut/paste
YurikGL (2004-11-08 18:18:00) [8]copy/paste ?
| |
