ďťż

Ładny brzuch

Mam problem! Chcę napisać własny plik typowany.
Wpisuję takie rekordziki:

type wpisy_rekord = record
dzial:string;
tytul:string;
autor:string;
praca:string;
end;

A w zmiennej takie coś:
wpisy: wpisy_rekord;
wpisy_plik: file of wpisy_rekord;

Wszystko to zrobiłem wzorując się na kursach i artykułach na ten temat a DELPHI 6 zwraca mi błąd. Chodzi o tą linię:
wpisy_plik: file of wpisy_rekord;
I wyświetla komunikat, że: Type 'wpisy_rekord' needs finalization - not allowed in file type

Proszę o pomoc


Type  TWpisy_Rekord = Record    Ddzial : string[255];    Tytul  : string[255];    Autor  : string[255];    Praca  : string[255];  End;  TWpisy = File Of TWpisy_Rekord; var  Wpisy: TWpisy;

Krócej:{$H-} Type TWpisyRek=Record Dzial,tytul,autor,praca:String; end; TWpisy= file of TWpisyRek;

Fakt, krotsze, ale moje bardziej czytelne :)



Type 'wpisy_rekord' needs finalization - not allowed in file type

A jeszcze lepiej i krócej - użyć ShortString. Dzięki temu zyskujemy zerowy oranicznik. Nie wiem czy on też jest, jeśli używa się dyrektyw.



Jeszcze krócej :Dtype TWpisy = file of record    dzial,tytul,autor,praca:shortstring;  end;


Krócej:{$H-} Type TWpisyRek=Record Dzial,tytul,autor,praca:String; end; TWpisy= file of TWpisyRek;


Tak BTW to potem gdzies sie chyba powinno "zamykac" to , czyli dawac dyrektywe {$H+} ?  :unsure:

  • zanotowane.pl
  • doc.pisz.pl
  • pdf.pisz.pl
  • zsf.htw.pl
    •