На Delphi 2007 имеется одна неприятная ошибка. Прописываю в public: record <name> .... <vars> .... end; После этого невозможно через свойства компонента создать процедуру - выдается ошибка при двойном клике (например выбираю на форме таймер, в его событиях выбираю OnTimer и двойной клик - вылетает ошибка - там что-то с initialization и end). Убираю описанную record в комменты - процедура создается, ошибок нет. Можно по другому написать как-нибудь? Просто необходимо некоторый набор переменных передавать во вторую форму. там значения переменных изменяются и передаются обратно. Так как их немало, я поэтому сгруппировал их в record.
код юнита в студию ну а так на первый взгляд вы record описали не верно PHP: type recordTypeName = record fieldList1: type1; ... fieldListn: typen; end
uses .....; type TForm1 = class(TForm) FontDialog1: TFontDialog; .................. procedure FontDialog1Apply(Sender: TObject; Wnd: HWND); ... private public sets:record hidefromtaskbar:boolean; showtrayalways:boolean; end; {придется каждую переменную отдельно: showtrayalways:boolean; hidefromtaskbar:boolean;} end; var Form1: TForm1;
