안녕 하십니까 ! 델파이 초보자로써 이런 곳을 보니 매우 기쁩니다. 당분간은 ROM족 신세를 면치 못하겠지만 언젠가는 정보도 제공해 줄수 있는 날이 오길 .... MAIN FORM에서 DLL로 SELF(TWindControl)를 넘기고 DLL에서 TForm1.CREATE ...
안치봉
•
1999.03.10 04:15
소스는 잘~ 받았습니다.
소스를 보니 약간은 잘못(?)된 부분이 있습니다(아래는 제가 수정한 겁니다).
...
신인재
•
1999.03.10 04:08
원영준 wrote:
> 안녕 하십니까 !
> 델파이 초보자로써 이런 곳을 보니 매우 기쁩니다.
> 당분간은 ROM...
안치봉
•
1999.03.10 02:11
원영준 wrote:
> 안녕 하십니까 !
> 델파이 초보자로써 이런 곳을 보니 매우 기쁩니다.
> 당분간은 ROM...
소스를 보니 약간은 잘못(?)된 부분이 있습니다(아래는 제가 수정한 겁니다).
procedure TForm1.b1Click(Sender: TObject);
var
mi : TMenuItem;
HInst : THandle;
fPtr : TFarProc;
_do : DODO;
begin
HInst := LoadLibrary('DLLTEST.dll');
if HInst <> 0 then
begin
@_do := GetProcAddress(HInst, '_do');
if @_do <> nil then _do(self, application);
FreeLibrary(HInst);
end;
end;
그리고 DLL 부분에도 잘못된 부분이 있는것 같습니다.
(아래는 제가 나름대로 테스트할때 쓴 DLL 부분입니다. 이건 잘 되거든요)
procedure _do(x:TWinControl; y:TApplication); stdcall;
var
f: TForm;
begin
f := TForm.Create(y);
f.ShowModal;
f.free;
end;
도움이 되셨는지 모르겠군요^^;
DLL 에 대해 공부하시려면 델파이의 도움말중 색인에서 DLL 에대해 보시면 많은 도움이 될겁니다~