Fórum Duvida Curso Aplicacao Comercial D2007DBX4FB2.0 Aula13 #401273

Aproveito em primeiro lugar para parabenizar o prof. Rodrigo C. Mourao. Estou tentando transformar este curso em multicamadas. Codigo Original para capturar o ID no evento on new record function TDM.GenID(tablename: String): Integer; var   Qry: TSQLQuery; begin   Qry := TSQLQuery.Create(Self);   Qry.SQLConnection := DBAcesso;   Qry.SQL.Add('SELECT GEN_ID(GEN_'+tablename+'_ID,1) FROM RDB$DATABASE');   Qry.Open;   Result := Qry.Fields[0].AsInteger; end;   Duvida: Não encontrei a propriedade na query instanciada para o TDCOMConecction no DM.              Já consegui ativar a query por param no ClientDataSet.              Primeira participação deste forum e desde já, agradeço.