저의 짧은 지식으로 해결하려 해도 시간이 고민하다 시간만
갔네요...
(델파이3 버전으로 win95에서 개발하고,win98에서 trace할 때
발생하지 않는지....)
아래 Logic중 두번째 IF FindWindow문에서
'...access violation ...' Error를 발생합니다.
고수님들 도와주세요....
//TFkc000m ==> 최상위 Form
procedure TFkc000m.FormNormalize(Sender:Tobject);
Var
hMyFocus : hwnd;
begin
// FindWindow 의 결과값이 0으로 return되어
// 바로 다음 '사원번호...'로 흐릅니다.
If FindWindow('TFkc110m', '이름으로 조회') <> 0 Then
begin
if Fkc110m.WindowState = wsminimized then
Fkc110m.WindowState := wsnormal;
end;
//***Breakpoint는 다른 곳에 찍었는데도(어떨땐 왼쪽의 파란
//***점들이 보이다가도 안 보임)
//***바로 이부분 begin절 안의 if문장으로 흐르면서
//***맨 아래와 같은 Error를 발생합니다......
If FindWindow('TFkc210m', '사원번호로 조회') <> 0 Then
begin
if Fkc210m.WindowState = wsminimized then
Fkc210m.WindowState := wsnormal;
end;
If FindWindow('TFkc330m', '입사일로 조회') <> 0 Then
begin
if Fkc330m.WindowState = wsminimized then
Fkc330m.WindowState := wsnormal;
end;
end;
Project Temp.exe raised exception class EAccessViolation with
message 'Access violation at address 004D4B67 in module 'TEMP.EXE'.
Read of address FFFFFFFF'. Process stopped.Use Step or Run to continue.
<수고하세요...>