Fórum Script Brasil > Sabendo De que Aba Se Trata

Versão Completa: Sabendo De que Aba Se Trata

Fórum Script Brasil > Programação & Desenvolvimento > Delphi, Kylix

ClaudioX

13/07/2006 - 12:14

Pessoal, tenho um form Form1, que contem abas, cada aba relacionada a uma tabela de um BD e com um botao excluir, quando o usuario clica em excluir abre-se um form Form4 e nele digita-se um codigo para a exclusao, que clicando em OK finaliza o processo. Todavia eu não sei como o form4 vai saber que aba o criou, para que eu analise de qual tabela sera feita a exclusao.

Simplificando acho que ficaria assim:

Como acessar o ActivePage da aba de um form pai, em um form filho??

Abracos,

Falows

Testei da seguinte forma mas da erro: Umdefined Symbol 'Abas'
Umdefined Symbol 'TabSheet1'

CODE

void __fastcall TDELETEPAG::Button1Click(TObject *Sender)
{
    if(Abas->ActivePage==TabSheet1)
    {
     AnsiString QuerySQL="DELETE FROM CLIENTES WHERE ";
       QuerySQL=QuerySQL+"ID_CLIENTE like ";
       QuerySQL=QuerySQL+"'"+Edit1->Text+"');";
       Application->MessageBox(QuerySQL.c_str(),"Aviso",MB_OK);
       Query1->Close();
       Query1->SQL->Clear();
       Query1->SQL->Add(QuerySQL);
       Query1->UnPrepare();
       Query1->Prepare();
       Query1->ExecSQL();
    }

Micheus

13/07/2006 - 16:00

QUOTE

tenho um form Form1, que contem abas, cada aba relacionada a uma tabela de um BD e com um botao excluir

ClaudioX, pelo trecho de código parece que você está usando a sintax do C, não pascal. Mesmo assim acho que o que está faltando seria o mesmo que faltaria no delphi: Acrescentar de onde provém o TabSheet1. Seria algo assim (?):
if(Form1->Abas->ActivePage==Form1->TabSheet1)

ClaudioX

13/07/2006 - 17:15

Inicialmente valeu pela força!!

Tipow é C/C++ sim, estou fazendo no C++ Builder, mas como um é a cara do outro a ajuda aqui é validissima!! =D

não estou no pc que desenvolvo mas exatamente as 18:30 de hj eu testo ela lá!!

Desde já, VaLeU pela ideia

T+

ClaudioX

13/07/2006 - 23:13

Cara infelizmente não deu certo, dá o mesmo erro... alguma outra ideia, postem aí pliz..

valeu!!
T+

Esta é uma versão simplificada de nosso conteúdo principal. Para ver a versão completa com maiores informações, formatação e imagens, por favor clique aqui.