Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   Uso de 2 Tablas en Delphi (https://www.clubdelphi.com/foros/showthread.php?t=91103)

Hyepiz 11-11-2016 19:48:08

Uso de 2 Tablas en Delphi
 
Estoy empezando a utilizar tanto Delphi como Firebird. Mi problema es el siguiente: Estoy trabajando con RAD 10 Seattle y usando una DB Firebird 3.0. En una forma tengo declarados
Código Delphi [-]
  type
  TFormaConceptos = class(TForm)
    TFDConnection_Sotsec: TFDConnection;
    DataSource1: TDataSource;
    ConceptosTable: TFDQuery;
    DBEd_Cod: TDBEdit;
    DBMemo1: TDBMemo;
         .
    .
    .
DBEdit7: TDBEdit;
    DataSource2: TDataSource;
    CategoriasTable: TFDQuery;
etc....

tengo un procedure
Código Delphi [-]
procedure TFormaConceptos.BitBtn3Click(Sender: TObject);
var
  encontrado:Boolean;

begin
  if DBEd_Cod.text<>'' then
    begin
      ConceptosTable.Open;
      encontrado:= false;
      ConceptosTable.First;
      while (not(encontrado)) and (not(EoF)) do
      begin
        if ConceptosTable.FieldValues['CVE_CPTO'] <> DBEd_Cod.Text then
        begin
          ConceptosTable.Insert;
          ConceptosTable.FieldValues['CONCEPTO']:=DBMemo1.Text ;
y hasta aquì todo muy bien.
El problema es cuando quiero usar la otra Tabla(CategoriasTable)
Código Delphi [-]
Procedure ValidaCat(CatID:String);
var
  Id:string;
  encontrado : Boolean;

begin
  Id:= CatID;
  if Id <> '' then
  begin
    CategoriasTable.Active;
    encontrado:= false;
    CategoriasTable.First;
    .    
    .
    .
Con sus respectivos end.

EL detalle es que no me reconoce el nombre de CategoriasTable... me marca
Cita:

[dcc32 Error] Cap_Conceptos.pas(122): E2003 Undeclared identifier: 'CategoriasTable'
que me falta declarar para que pueda trabajar con las 2 tablas. De antemano les agradezco su ayuda.

Casimiro Noteví 11-11-2016 19:59:13

Bienvenido a clubdelphi, como siempre aconsejamos a los nuevos, no olvides leer nuestra guía de estilo, gracias por tu colaboración :)

Recuerda poner los tags al código fuente, ejemplo:



Gracias :)

roman 11-11-2016 20:00:01

Hola, bienvenido al ClubDelphi. Mira cómo luce tu código ahora que lo he colocado entre etiquetas [delphi] [/delphi]. Te invito a usarlas en ocasiones posteriores.

En cuanto a tu duda actual, habría que ver dónde tienes declarado el componente CategoriasTable, pero lo que puedo notar es que ValidaCat es un procedimiento suelto y no un método de tu formulario. Si CategoriasTable está en el formulario, entonces sólo los métodos del formulario puden verlo.

LineComment Saludos

Edito: Lo dicho por Casimiro Notevi :)

ecfisa 11-11-2016 20:00:20

Hola Hyepiz, bienvenido a los foros de Club Delphi :)

Como se acostumbra con los ingresantes te invitamos a que leas nuestra guía de estilo.

Por favor cuando incluyas código en un mensaje encierralos entre etiquetas de este modo:



Saludos :)


Edito: Casi al mismo tiempo... :), bueno lo dicho por Casimiro Notevi y roman :)

Hyepiz 11-11-2016 21:05:29

Uso de 2 Tablas en Delphi
 
Gracias Jovenes!!!

Roman Tienes razon... incluí el procedimiento en un evento de la forma y dejé de recibir errores.

Mil Gracias a Todos..


La franja horaria es GMT +2. Ahora son las 13:29:02.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi