Tablas en Function

[rolando_s]

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]

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]

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.


// 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...