@lukersgn:

procedure TFormSearchBank.cxGrid1DBTableView1CellDblClick(
  Sender: TcxCustomGridTableView;
  ACellViewInfo: TcxGridTableDataCellViewInfo; AButton: TMouseButton;
  AShift: TShiftState; var AHandled: Boolean);
begin
  FormMissionOrder.edBankName.Text := qSearchBank.FieldByName('BANK_NAME').AsString;
  FormMissionOrder.edAccountName.Text := qSearchBank.FieldByName('ACCOUNT_NAME').AsString;
  FormMissionOrder.edAccountNo.Text := qSearchBank.FieldByName('ACCOUNT_NR').AsString;
  Close; ---> perintah ini yang menjadi biang keladi Error "Acces Violation....."
end;

Coba Gunakan Coding Berikut Untuk Lookup

// Pada FormMissionOrder..
Procedure TFormMissionOrder.Btn1Click(Sender : Tobject);
begin
   with TFormSearchBank.Create(Self) do
   begin
       If ShowModal=MrOk then
       begin
          edBankName.Text := qSearchBank.FieldByName('BANK_NAME').AsString;
          edAccountName.Text := qSearchBank.FieldByName('ACCOUNT_NAME').AsString;
          edAccountNo.Text := qSearchBank.FieldByName('ACCOUNT_NR').AsString;       
       end;
    Free;
   end;
end;

Pada FormSearchBank, ada tambahkan Button OK setelah memilih salah satu data dan jangan lupa Open QuSearchBank pada Event On Create Or OnShow

Procedure TFormSearchBank.BtOKClick(Sender:Tobject)
begin
   Modalresult = MrOk;  
end;