Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.06.25;
Скачать: CL | DM;

Вниз

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

 
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]


опередил :)


 
antonn ©   (2006-06-03 20:11) [4]

Iehbr ©   (03.06.06 20:10) [3]
ага:)
а еще я тегами пользуюсь ;)


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

antonn, Iehbr

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



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

Текущий архив: 2006.06.25;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.009 c
2-1149684223
UniCode
2006-06-07 16:43
2006.06.25
Помогите разобраться с Captions на Unicode


2-1149669364
XTD
2006-06-07 12:36
2006.06.25
А можно ли цменить свет(стиль) прокрутки ListBox ???


3-1144615745
Brak
2006-04-10 00:49
2006.06.25
Простенькая БД


15-1149150033
RA
2006-06-01 12:20
2006.06.25
Перезд в столицу? (Киев)


2-1149410296
Wood
2006-06-04 12:38
2006.06.25
Найстройка bevel





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский