Q&A

  • 에러메시지에서 어디가 잘못된걸까요?
*>에서 아래와 같은 에러메시지가 나타났는데 어디가 잘못된걸까요?
====================================================================
[Error] uMain.pas(56): Type 'BitRecord' needs finalization - not allowed in file type
====================================================================
unit uMain;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  Menus, ExtCtrls, jpeg;

type
  TfrmMain = class(TForm)
    MainMenu1: TMainMenu;
    F1: TMenuItem;
    N1: TMenuItem;
    N2: TMenuItem;
    N3: TMenuItem;
    N4: TMenuItem;
    Image1: TImage;
    Image2: TImage;
    SaveDialog1: TSaveDialog;
    procedure N1Click(Sender: TObject);
    procedure N4Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  frmMain: TfrmMain;

implementation

uses uCfg;

type
   BitRecord = record
      auth : string;
      org : string;
      title: string;
      pic: TBitmap;
   end;
var
*>   Annfile : file of BitRecord;

{$R *.DFM}

procedure TfrmMain.N1Click(Sender: TObject);
begin
frmCfg.Visible:=true;
end;
0  COMMENTS