Help!!! Kompilacja programu pascal 7.0 - problem - Thread - go-pugleaf

Thread View: pl.comp.lang.pascal

6 messages

[T] Back to Threads [V] Tree View [G] Group Articles

6 total messages Started by "G.K." Sat, 08 Jan 2011 20:00

Help!!! Kompilacja programu pascal 7.0 - problem

#89763

Author: "G.K."
Date: Sat, 08 Jan 2011 20:00

16 lines
432 bytes

Witam wszystkich,
Mam pewien programik napisany lata temu, chciałem go skompilować i nie mogę.
W jednym z plików drivers.pas jest fragment
{$ifdef dpmi}
{$L SYSINT.OBP}
{$ELSE}
{$L SYSINT.OBJ}
{$ENDIF}

i kompilator wywala mi błąd
Error 15: File not found (SYSINT.OBJ)
Z tego co widzę, plik drivers to jakiś standardowy plik pascala, pojawia
się na wielu stronach www. Skąd wziąć ten plik sysint?
Pozdrawiam,
Grzegorz

Re: Help!!! Kompilacja programu pascal 7.0 - problem

#89764

Author: "G.K."
Date: Sat, 08 Jan 2011 20:02

21 lines
618 bytes

W dniu 2011-01-08 20:00, G.K. pisze:
> Witam wszystkich,
> Mam pewien programik napisany lata temu, chciałem go skompilować i nie
> mogę.
> W jednym z plików drivers.pas jest fragment
> {$ifdef dpmi}
> {$L SYSINT.OBP}
> {$ELSE}
> {$L SYSINT.OBJ}
> {$ENDIF}
>
> i kompilator wywala mi błąd
> Error 15: File not found (SYSINT.OBJ)
> Z tego co widzę, plik drivers to jakiś standardowy plik pascala, pojawia
> się na wielu stronach www. Skąd wziąć ten plik sysint?
> Pozdrawiam,
> Grzegorz

Ten plik drivers można znaleźć np tu:
http://kix.fsv.cvut.cz/~vanicek/vyuka_l09/KRYPTIK/RESOURCE/UNITS/DRIVERS.PAS

Re: Help!!! Kompilacja programu pascal 7.0 - problem

#89765

Author: "G.K."
Date: Sat, 08 Jan 2011 20:08

37 lines
877 bytes

W dniu 2011-01-08 20:02, G.K. pisze:
> Ten plik drivers można znaleźć np tu:
> http://kix.fsv.cvut.cz/~vanicek/vyuka_l09/KRYPTIK/RESOURCE/UNITS/DRIVERS.PAS
>

Znalazłem ten plik, ale mam kolejny problem.
W jednym z plików wywali mi komunikat o błędzie:
Error 26: Type mismatch

ścieżka z błędem to:
FormatStr(S, '%2d. %-30s %6d %-6s%8z zl', P);

Cała funkcja:

function TRachList.GetText(Item: Integer; MaxLen: Integer): string;
var
   S: string[80];
   P: record
     Num: Longint;
     Opis: PString;
     Ile: Longint;
     Jedn: PString;
     Wart: Longint;
   end;
begin
   with PRachRec(List^.At(Item))^ do
     begin
       P.Num := Item+1;
       P.Opis := Opis;
       P.Ile := Ilosc;
       P.Jedn := @Jedn;
       P.Wart := WartoscZPodatkiem(Cena, Ilosc, VAT, Rabat);
       FormatStr(S, '%2d. %-30s %6d %-6s%8z zl', P);
     end;
   GetText := S;
end;

Re: Help!!! Kompilacja programu pascal 7.0 - problem

#89766

Author: "Wiktor S."
Date: Sun, 09 Jan 2011 20:12

15 lines
288 bytes

> Mam pewien programik napisany lata temu, chciałem go skompilować i
> nie mogę. W jednym z plików drivers.pas jest fragment

Dlaczego kompilujesz drivers, skoro to standardowy unit Turbo Pascala?

> Error 26: Type mismatch

daj "var S:string;" zamiast "string[80]".



--
Azarien

Re: Help!!! Kompilacja programu pascal 7.0 - problem

#89767

Author: "G.K."
Date: Tue, 11 Jan 2011 21:12

20 lines
565 bytes

W dniu 2011-01-09 20:12, Wiktor S. pisze:
>> Mam pewien programik napisany lata temu, chciałem go skompilować i
>> nie mogę. W jednym z plików drivers.pas jest fragment
>
> Dlaczego kompilujesz drivers, skoro to standardowy unit Turbo Pascala?
>
>> Error 26: Type mismatch
>
> daj "var S:string;" zamiast "string[80]".
>
>
>

Prawdę mówiąc to dostałem źródła i nie wiedziałem jak to skompilować.
Jak kompilowałem główny plik to mi wywalało błędy.
Może ktoś pomoże?
Jak ustawić kompilator i jak w ogóle się kompiluje?
Pozdrawiam,
Grzegorz

Re: Help!!! Kompilacja programu pascal 7.0 - problem

#89768

Author: "Wiktor S."
Date: Wed, 19 Jan 2011 08:06

12 lines
261 bytes

> Prawdę mówiąc to dostałem źródła i nie wiedziałem jak to skompilować.
> Jak kompilowałem główny plik to mi wywalało błędy.
> Może ktoś pomoże?
> Jak ustawić kompilator i jak w ogóle się kompiluje?

ale w czym problem? ;-)


--
Azarien

Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads