Скачать: CL | DM;

Процедуры   Найти похожие ветки 

← →
Shadow-st   (2004-11-08 18:14) [0]

Здравствуйте!
Как вынести процедуры программы в отдельный *.pas?

---

← →
YurikGL ©   (2004-11-08 18:18) [1]

copy/paste ?

---

← →
Anatoly Podgoretsky ©   (2004-11-08 19:28) [2]

Нет
cut/paste

---

← →
Sphinx   (2004-11-08 19:41) [3]

Убрать вначале TForm1. или аналог и перенести все используемые глобальные переменные (если есть) в строку вызова, ну а потом естественно
> Anatoly Podgoretsky ©   (08.11.04 19:28) [2] или > YurikGL ©   (08.11.04 18:18) [1]

---

← →
Shadow-st   (2004-11-09 18:16) [4]

Шутники...Тупость юмора отражает степень ваших мозгов.
То,что вы сказали я знал. Я спросил как оформить этот *.pas как вызвать правильно оттуда процедуру.

---

← →
Reindeer Moss Eater ©   (2004-11-09 18:22) [5]

File->New->Unit

Тоже не катит?

---

← →
icWasya ©   (2004-11-09 18:26) [6]

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.

---

← →
Pentium133 ©   (2004-11-09 18:27) [7]

можно так:

файл proc.pas:

procedure MyProc
begin
......
end;

основная программа
{$I proc.pas}

---

← →
Poirot ©   (2004-11-09 18:33) [8]

<offtop>
Shadow-st   (09.11.04 18:16) [4]
Моя плакать. :)
А ешшо как назвался-то:))))
</offtop>
Учи мат часть.
А по правильному как в книждках ешшо копирайты надо на суперпупер процедуру + описание модуля и параметров подпрограмм:)

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.023 c