Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 Q&A
Delphi Programming Q&A
[3702] >질문< 자원관리에 대해서
yesung7 [ ] 1055 읽음    1998-07-21 16:37
델파이에 입문한지 얼마 안된 초보입니다.
컴파일을 하는데 아래와 같은 메세지가 ....

ProJect Sale_p.exe Raised exceltion class EVccwssViolation with
message. 'Access violation at Address 00000017. Write of Address
EFF08094'. Process Stopped. Use Step or Run to continue.

그래서 try ~ finally 문은 사용하여 자원을 해제했는데도 같은 메서지가
발생하더라구요...
main 부분에 문제가 있는건지 아니면 SUB부분에 문제가 있는건지 잘 모르겠네요...

자원관리는 어떤 식으로 해야되나요?
아직 자원을 관리하는 곳에서는 미흡한 부분이 너무도 많아서 이렇게 질문을
던집니다.
항상 질문만 해서 죄송합니다...

도사님들의 지도를 부탁바라면서....

참고로 제가 처음 작성한 소스의 Main 부분입니다.

unit main_u;

interface

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

type
  Tmain_f = class(TForm)
    MainMenu1: TMainMenu;
    N1: TMenuItem;
    N2: TMenuItem;        //종료메뉴//
    N3: TMenuItem;
    N4: TMenuItem;
    N5: TMenuItem;
    N6: TMenuItem;
    N7: TMenuItem;
    N8: TMenuItem;
    procedure N3Click(Sender: TObject);
    procedure N7Click(Sender: TObject);
    procedure N4Click(Sender: TObject);
    procedure N5Click(Sender: TObject);
    procedure N6Click(Sender: TObject);
    procedure N8Click(Sender: TObject);
    procedure N2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  main_f: Tmain_f;

implementation

uses bank_u, ku_u, item_u, cust_u, dan_u, gi_u;

{$R *.DFM}

procedure Tmain_f.N3Click(Sender: TObject);
begin
     bank_f.showmodal;
end;

procedure Tmain_f.N7Click(Sender: TObject);
begin
     ku_f.showmodal;
end;

procedure Tmain_f.N4Click(Sender: TObject);
begin
     item_f.showmodal;
end;

procedure Tmain_f.N5Click(Sender: TObject);
begin
     cust_f.showmodal;
end;

procedure Tmain_f.N6Click(Sender: TObject);
begin
     dan_f.showmodal;
end;

procedure Tmain_f.N8Click(Sender: TObject);
begin
     gi_f.showmodal;
end;

procedure Tmain_f.N2Click(Sender: TObject);
begin
     CLOSE;
end;

end.


+ -

관련 글 리스트
3702 >질문< 자원관리에 대해서 yesung7 1055 1998/07/21
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.