Создание и использование своего юнита с процедурами и функциями

← →
allrussia (2006-06-03 20:00) [0]

unit Imp; interface uses SysUtils, Windows, Forms, Dialogs; type TImp = class (TOBject) protected function AddS: integer; public function AddX: integer; end; implementation uses Unit1; function TImp.AddS: integer; begin result := 1; end; function TImp.AddX: integer; begin result := 1; end; end.

Нужно чтобы я мог подключить этот юнит к проекту и спользовать функции

получается только так:
with TImp.Create do Addx;

а мне нужно просто Addx

что я не так делаю. спасибо

← →
antonn © (2006-06-03 20:05) [1]

может так?
без классов и объектов:
unit Imp; interface uses SysUtils, Windows, Forms, Dialogs; function AddS: integer; implementation function AddS: integer; begin result := 1; end; end.

← →
Iehbr © (2006-06-03 20:08) [2]

unit MyUnit;

interface
function AddS : Integer;
implementation
Function AddS : Integer;
begin
Result := 1;
end;
end.

← →
Iehbr © (2006-06-03 20:10) [3]

> antonn © (03.06.06 20:05) [1]

опередил :)

← →
allrusia (2006-06-03 20:14) [5]

antonn, Iehbr

Спасибо за оперативный ответ!

Создание и использование своего юнита с процедурами и функциями Найти похожие ветки