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)
-   -   Tablas en Function (https://www.clubdelphi.com/foros/showthread.php?t=17121)

rolando_s 23-12-2004 19:07:07

Tablas en Function
 
la tabla esta bien por que si la llamo desde una procedure abre y etc.....
trato de abrir una tabla dentro de una funcion y me da un error
[Error] Control.pas(66): Undeclared identifier: 'Table1'

Function boton(xxx: String):String;
var
a : Integer;
but :TComponent;
begin
but:=Salas.FindComponent('inp'+intToStr(a));
Table1.open; :confused:
Table1.Edit;
*********
Tbutton(but).Caption:=(Table1.FieldByName('nombre')+intToStr(a)

esto continua, todo camina bien mientras no trate de abrir la tabla desde la funcion
les agradecere cualquier ayuda
muchas gracias de antemano

Lepe 23-12-2004 19:39:46

En ese trozo de código no aparece definida table1, o bien está en otro formulario... con lo cual sería Form1.Table1.Open

O bien te falta la añadir el uses DBTables

Saludos

maeyanes 23-12-2004 21:26:59

Tu problema es que la función no pertenece a la forma o módulo de datos, así que para poder usar el TTable dentro de tu función la tendrías que pasar como parámetro, o hacer que la función sea un método de la forma o módulo de datos.

Código Delphi [-]
// Caso 1
function Boton(str: string; Table: TTable): string;
begin
  Table.Open;
  Table.Edit;
  // etc, etc...
end;

// Caso 2
function TMyForm.Boton(str: string): string;
begin
  Table1.Open;
  Table1.Edit;
  // etc, etc...
end;

Espero que esto te ayude...


Saludos...


La franja horaria es GMT +2. Ahora son las 14:51:35.

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