안녕하십니까...
Query4와 Query12 컴포에 각각 AfterScroll 이벤트에 코딩했는데
소스는 다음과 같습니다..
procedure TDM.Query4AfterScroll(DataSet: TDataSet);
begin
form1.Edit1.Text := DM.Query4.fieldbyname('item_code').ASstring;
form1.combobox1.Text := DM.Query4.fieldbyname('item_name').ASstring;
end;
procedure TDM.Query12AfterScroll(DataSet: TDataSet);
begin
form3.Edit1.Text := DM.Query12.fieldbyname('item_code').ASstring;
form3.Edit2.text := DM.Query12.fieldbyname('item_name').ASstring;
end;
프로그램을 실행하면...
첨부화일과 같은 에러가 뜹니다..
확인누르고 들어가면 실행은 되는데 왜 그런 메세지가 뜨는지요..
하나는 AfterScroll이벤트를 쓰고 하나는 BeforeScroll이벤트를 쓰면
그런 에러는 뜨지 않는데...
답변부탁드립니다..
그럼 이만...
Project / Options 에 보니깐..
form3가 Available forms에 있더라구요
auto-create forms로 이동시키니깐 그런 에러가 뜨지 않더라구요
폼을 동적으로 생성시킬때는 Available forms으로 옮기라고 하던데
그냥 auto-create forms에 놔둬도 되는건지
실행하는데는 문제는 없는데 그냥 써도 될지...
답변 부탁드립니다.