감사합니다.
그런데 모듈에서 Initialization을 사용한 흔적은 없네요.
이 현재 상태로 프로그램이 돌았다고 하는데 현재 프로젝트 그룹외의 프로그램에서 이 클래스를 부르면서도 Initilization을 해줄 수 있는건지요. 있다면 어떻게 하는 건가요.
Lyn 님이 쓰신 글 :
: initialization 을 사용 해 보세요
:
: 맨디 님이 쓰신 글 :
: : 1주일 내내 붙잡고 있었는데 도저히 알수가 없어 질문드립니다.
: : 프로그램을 하나 받아서 돌리는데 사용하는 변수를 Instanciate 안해서 메모리 에러가 납니다.
: : 이 상태로 돌았던게 확실히 맞는것 같은데 이 모듈을 부르기 전에 다른 모듈에서 초기화를 시켜줄 수 있는 건지요.
: :
: : Form 안에 이렇게 Database1 객체가 정의되어 있는데 얘를 Database1:=TAdatabase.create 없이 FormCreate 메소드에서 바로 불러씁니다. 그리고 Database1에 속한 변수를 바로 불러 쓰는데 그 변수에 값이 미리 write된 상태여야 하는 게 확실합니다.
: : 제발 어떤 의견이라도 알려주세요. 부탁드리고 미리 감사드립니다.
: :
: : type
: : TAForm = class(TForm)
: :
: : Panel1: TPanel;
: : RichEdit1: TRichEdit;
: : ProgressBar1: TProgressBar;
: : procedure FormCreate(Sender: TObject);
: : procedure FormActivate(Sender: TObject);
: : procedure CloseButtonClick(Sender: TObject);
: : private
: : { Private declarations }
: : function fnExtendDates :LongInt;
: : procedure fvAddToMemo(const s:string);
: : procedure fvOnException(Sender :TObject; E :Exception);
: : protected
: : Database1: TAdatabase;
: : public
: : { Public declarations }
: : end;
|