DB Class에서는 클래스만 구현해주고.

각각의 유닛에서 객체를 만들어서 사용해야 겠지요..

Form1 과 Form2가 잇고 DB class 이름이 TDBClass이라면

Form1에서는

Form1DBObj := TDBClass.Create;

Form2에서는

Form2DBObj := TDBClass.Create;

이렇게 해야 클래스란 개념을 잘 살린거 같아요..

그냥 DB 유닛파일에

var
  DBClass : TDBCLass

이렇게 선언하고 DBCLass를 쓰는 구조라면 그냥 파일을 나눴을 뿐이라는

의미밖에 없다고 생각됩니다.

저렇게 되면 Form마다 DBModuls이 하나씩 있어야 겠지요..

네.. 폼에서 클래서 정의 및 생성하고 사용합니다.. DB module에서 Query,

DataSouce 컴포넌트를 공유해서 사용하는 것에서 문제가 발생하는 건데요..

이걸 해결하기 위해서 class안에 query, datasouce 컴포넌트를 너어서

사용할려고 합니다.

문제는 여기서 grid에 datasouce연결에서 에러가 발생하네요...

그리고,

query 컴포에서 open하면 에러가 발생하네요..

지금 여러가지 방법으로 테스트 중인데..

제가 포인트 개념을 잘 몰라서 포인트 공부중.....

포인트로 주소를 넘겨 주면 될껐도 같은데.. 흠..

DB Class파일하고 적용된 부분을 보여주세요..

그리고 에러 메세지도....모여주시면 답을 드리는데 도움이 될거 같은데요.

구조 상으로는 문제가 없을거 같은데요..

뭔가 자잘한 부분을 놓치신게 아닌가 싶습니다.큰것일수도 잇고..

//////////////////////////////////////////////////////////////

올리지 않으시니 별의미 없는 글이 될까하여 제생각을 약간 적습니다.

TDBControl 이란 클래스가 있다면 그안에 DataSource와 Query가 있다면
(제생각엔 그리드도 같이 올려 놓고 세트로 쓰면 좋을텐데....)

이와 같다면 생성자를 재정의 해서 파라미터로 그리드의 포인터를 받습니다.

type
  TPGrid = ^Grid;

type
  TDBControl = Class;  
  .........
  private
  procedure ControlsConnect;
  constructor create(PGrid : TPGrid); reintroduce;  
  end;

MyDBControl := TDBControl.Create(@Grid1);
MyDBControl.ControlsConnect;

위 문법이 맞는지는 모르겠습니다만 저렇게 하는게 좋을듯 합니다.

사실 더 좋은 방법이 있는데 제가 모를수도 있으니 양해 바랍니다.