Hola Yugo.
Cita:
Empezado por Yugo
...
Trato de abrir una tabla paradox seleccionándola desde un TOpenDialog que aparece tras pulsar el TButton1, para que sea visualizada en el TDBGrid y al pulsar el TButton2 se abra un TForm2 donde hay colocado un TEdit para capturar el nombre de la tabla abierta en el TForm1 mediante... Edit1->Text = Form1->TablaAbierta->TableName;
Pero algo falla y no soy capaz de verlo...
|
Bueno, la verdad... tampoco veo el código que le asigna el valor al edit de Form2
Si no te entendí mal, podes hacer:
Código PHP:
...
#include "Unit2.h"
...
void __fastcall TForm1::Button2Click(TObject *Sender)
{
if (TablaAbierta->Active) { // verificar si se abrió una tabla
if (Form2 == NULL) // si Form2 no fué creado,
Form2 = new TForm2(this); // crearlo
Form2->Edit1->Text = TablaAbierta->TableName; // nombre de tabla a Edit
Form2->Show(); // Mostrar
}
else
MessageBox(0, "Debe elegir una tabla primero", "", MB_ICONWARNING | MB_OK);
}
Saludos