Witaj Gościu! ( Zaloguj | Rejestruj )

Forum PHP.pl

 
Reply to this topicStart new topic
> [Pascal] Coś w stylu include
nitro18
post
Post #1





Grupa: Zarejestrowani
Postów: 311
Pomógł: 7
Dołączył: 2.08.2006
Skąd: Bystrzyca Kłodzka/Nysa

Ostrzeżenie: (10%)
X----


Mam pytanie: w jaki sposób dołączyć plik w pascalu. coś w stylu INCLUDE w php. Nie chodzi mi o reset(plik)

WIe ktoś?


Dzięki za odpowiedź.
Go to the top of the page
+Quote Post
PiotrLegnica
post
Post #2





Grupa: Zarejestrowani
Postów: 71
Pomógł: 2
Dołączył: 6.07.2005
Skąd: Legnica

Ostrzeżenie: (0%)
-----


{$I plik} albo {$include plik}, zależy od kompilatora.


--------------------
SithTemplate
Go to the top of the page
+Quote Post
nitro18
post
Post #3





Grupa: Zarejestrowani
Postów: 311
Pomógł: 7
Dołączył: 2.08.2006
Skąd: Bystrzyca Kłodzka/Nysa

Ostrzeżenie: (10%)
X----


i nie mogę sobie poradzić z tym.... używam kompilatora Turbo Pascal 7.0 firmy Borland...

mogę prosić o sprawdzenie kodu i podać jak to powinno prawidłowo wyglądać (prosze pominąć a w beginie gdyż jest to wywoływana procedura z dołączanego pliku) bo coś u mnie nie działa sad.gif:

[quote]

program probuj;
uses crt;
begin
include('ok.pas'); {dolaczam plik}

clrscr;


a; {wywolanie procedury z pliku}

readln;
end.

[quote]
Go to the top of the page
+Quote Post
kwiateusz
post
Post #4


Admin Techniczny


Grupa: Administratorzy
Postów: 2 071
Pomógł: 93
Dołączył: 5.07.2005
Skąd: Olsztyn




widać że czytasz bez zrozumienia.. nie include a {$I plik} i to przed begin musisz wstawić ...
Go to the top of the page
+Quote Post
tiraeth
post
Post #5





Grupa: Przyjaciele php.pl
Postów: 1 789
Pomógł: 41
Dołączył: 30.10.2003
Skąd: Wrocław

Ostrzeżenie: (0%)
-----


Specjalnie dla Ciebie zainstalowałem Free Pascal 2.0.2 smile.gif

include_demo.pas
Kod
program include_demo;
uses crt;
{$I procedures.pas}
begin
   HalloMoto();
   readln;
end.


procedures.pas
Kod
procedure HalloMoto();
begin
   write('Hello World!!');
end;


Działa smile.gif
Go to the top of the page
+Quote Post

Reply to this topicStart new topic
1 Użytkowników czyta ten temat (1 Gości i 0 Anonimowych użytkowników)
0 Zarejestrowanych:

 



RSS Aktualny czas: 21.08.2025 - 12:10