работа с записями в delphi

← →
FIL-23 © (2006-12-23 21:39) [0]

такая проблема длефяк не воспринимает следующий код:

type TnewFil=record Fnum:string; Fvopros:string; Fotvet1:string; Fotvet2:string; Fotvet3:string; Fotvet4:string; end; TForm1 = class(TForm) SpinEdit1: TSpinEdit; Memo1: TMemo; Memo2: TMemo; Memo3: TMemo; Memo4: TMemo; Memo5: TMemo; Button1: TButton; Memo6: TMemo; Memo7: TMemo; Memo8: TMemo; Memo9: TMemo; Memo10: TMemo; Memo11: TMemo; procedure FormCreate(Sender: TObject); procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var f:file of TnewFil; n:TnewFil;

на строке присвоение переменной f типа, он выдает ошибку что мол такой тип не допустим для файла.
Может кто поможет понять что за не срастуха такая, или кинит ссылку где хорошо изяснено по работе с записями в делфи. Зарание спасибо

← →
Kolan © (2006-12-23 21:44) [1]

«string;»

Наверно дело в этом. Длинна неизветсна.

← →
Anatoly Podgoretsky © (2006-12-23 21:45) [2]

> FIL-23 (23.12.2006 21:39:00) [0]

А зачем ты привел определение класса TForm1?
А какого типа у тебя string - видимо AnsiString, смени на ShortString и тогда можно будет создавать такой тип файла, а так какой смысл записывать указатель в файл?

← →
FIL-23 © (2006-12-23 21:58) [3]

спасибо за мысль на счет string..... я тут попробовал и в самом деле в нем дело оказалось ..... но..... мне надо записать не 256 символо же :) поэтому я сделал так {$h-}

← →
Palladin © (2006-12-23 22:00) [4]

^)) в орешник

← →
Anatoly Podgoretsky © (2006-12-23 22:00) [5]

> FIL-23 (23.12.2006 21:58:03) [3]

В таком случае отказывайся от типизированого файла.

> Gero © (23.12.06 23:48) [6]
>
> > [3] FIL-23 © (23.12.06 21:58)
> > поэтому я сделал так {$h-}
>
> Зачем ты так сделал?
>

Имхо, "грубая" реализация совета в [2].

работа с записями в delphi Найти похожие ветки