Kako da pozovem proceduru koja se nalazi na drugom unit-u ?

Odgovori Nova tema

2 odgovora
3.614 pregleda

Kako da pozovem proceduru koja se nalazi na drugom unit-u ? 31.12.2005. u 12:58 · pre 253 meseca #1

Imam dva Unit-a.Na prvom je neka procedura blabla; , a na drugom unit-u mi treba ta procedura sa prvog unit-a.Dosad sam je pozivao tako sto sam na prvom Unit-u napisao neku svoju klasu i pod tom klasom napisao tu moju proceduru blabla i preko klasa je pozivao na drugim Unit-ima.Sve to radi ok,nego uvek mi posle prijavljuje ono " Variable 'PomVar' might not have been initialized ".PomVar je promenjiva te moje klase.Nije neki problem ali kako da izbegnem ovo?Hvala,pozzzz

Potpis

Ivan :)

Re: Kako da pozovem proceduru koja se nalazi na drugom unit-u ? 31.12.2005. u 13:38 · pre 253 meseca #2

Ne znam sta ti nije jasno...napravis unit:

Code:

Unit MojUnit;

interface
function zbroji(br1,br2:integer):integer;

implementation

function zbroji(br1,br2:integer):integer;
begin
writeln('Rezultat zbrajanja: ',br1+br2);
end;

end.

I program koji koristi taj unit:

Code:

program bzvz;
uses crt,mojunit;

var br1,br2:integer;

begin
clrscr;
writeln('Upisite prvi broj:'); readln(br1);
writeln('Upisite drugi broj:'); readln(br2);

zbroji(br1,br2);

readln;
end.

Jedino ako nisam dobro shvatio sta ti nije jasno?

Re: Kako da pozovem proceduru koja se nalazi na drugom unit-u ? 31.12.2005. u 14:44 · pre 253 meseca #3

Da,da to je ok!Nego sam uvek pozivao procedure onako preko klasa!Hvala,poz!!!

Potpis

Ivan :)

Prijavite se da biste odgovorili u ovoj temi.Prijava Registracija

Forum kao aplikacija na telefonu

Srodne teme