Q&A

  • 인터베이스 초보입니다.. 다중사용자용 프로그램 만들려면?


인터베이스에서

IBEXPRESS 로 예제프로그램을 테스트 했는데요,

프로그램을 2개띄워놓고,

서로 편집하니까, 서로 업데이트가 안됩니다. <=====

(한PC에서)



IBQUERY1.CLOSE;

IBQUERY1.REFRESH; 해도요..

어떻게 해야하죠?



그리고, 인터베이스에서 IBDATASOURCE 가 없네요..



(저는, 인터베이스6서버, 델파이5에서 테스트했습니다.

TDATABASE,TDATASOURCE,TIBQUERY,TIBUPDATEQUERY )



(소스와 설명이 있더군요)

http://www.inprise.co.kr/delphi/papers/dwp/ibexpress/ibexpress.htm





'열기' 버튼의 OnClick 이벤트 핸들러를 작성하세요:



procedure TForm1.btnOpenClick(Sender: TObject);



begin



IBQuery1.Open;



end;



'저장' 버튼의 OnClick 이벤트 핸들러:



procedure TForm1.btnSaveClick(Sender: TObject);



begin



if IBTransaction1.InTransaction then



begin



try



IBQuery1.ApplyUpdates;



IBTransaction1.Commit;



IBQuery1.Open;



except



IBTransaction1.Rollback;



end;



end



else ShowMessage('트랜잭션 모드가 아닙니다.');



end;



'취소' 버튼의 OnClick 이벤트 핸들러를 작성하세요:



procedure TForm1.btnCancelClick(Sender: TObject);



begin



IBQuery1.CancelUpdates;



end;



'새로 고침' 버튼의 OnClick 이벤트 핸들러를 작성하세요:



procedure TForm1.btnRefreshClick(Sender: TObject);



begin



IBQuery1.Close;



IBQuery1.OPen;



end;



0  COMMENTS