Enxergar Edit´s do Form principal....
:idea:
Olá a todos.
Temos o form do programa Ex: FrM1000, e criei uma unit de procedures deste form/programa chamada UnM1000_Proc.
Criei nesta unit de procedures rotinas tipo:
Get_Clientes,
esta procedure esta na unit de procedures da seguinte forma.
With FrM1000 do
begin
EdtCodCli.Text := Dm.CliDtSt.FieldByName(´Cli_Cod´).asstring;
EdtNome.Text := Dm.CliDtSt.FieldByName(´Cli_NOme´).asstring;
end;
Mas quando executamos retorna erro:
Access Violation At Address......
Como posso resolver este problema.
Imaginava que estando dentro do With não precisaria declarar o nome do Form como abaixo.
FrM1000.EdtCodCli.Text := Dm.CliDtSt.FieldByName(´Cli_Cod´).asstring;
Abraços
Neto
Olá a todos.
Temos o form do programa Ex: FrM1000, e criei uma unit de procedures deste form/programa chamada UnM1000_Proc.
Criei nesta unit de procedures rotinas tipo:
Get_Clientes,
esta procedure esta na unit de procedures da seguinte forma.
With FrM1000 do
begin
EdtCodCli.Text := Dm.CliDtSt.FieldByName(´Cli_Cod´).asstring;
EdtNome.Text := Dm.CliDtSt.FieldByName(´Cli_NOme´).asstring;
end;
Mas quando executamos retorna erro:
Access Violation At Address......
Como posso resolver este problema.
Imaginava que estando dentro do With não precisaria declarar o nome do Form como abaixo.
FrM1000.EdtCodCli.Text := Dm.CliDtSt.FieldByName(´Cli_Cod´).asstring;
Abraços
Neto
Neto
Curtidas 0
Respostas
Marco Salles
22/10/2007
Imaginava que estando dentro do With não precisaria declarar o nome do Form como abaixo.
FrM1000.EdtCodCli.Text := Dm.CliDtSt.FieldByName(´Cli_Cod´).asstring;
Sei não... Acho que o problema não é este não...
Quando voce usa usando o Nome explicitamente funciona ????
ou da erro de acessos violados tb ?????
GOSTEI 0
Neto
22/10/2007
Você tem razão,
mesmo explicitamente esta apresentando o erro, veja a linha:
E graças a sua dica me despertou que estou fazendo isso no OnCreate, já alterei e rodou
Muito obrigado
Neto
mesmo explicitamente esta apresentando o erro, veja a linha:
E graças a sua dica me despertou que estou fazendo isso no OnCreate, já alterei e rodou
Muito obrigado
Neto
GOSTEI 0
Alexandrej
22/10/2007
Access Violation At Address......
FrM1000.EdtCodCli.Text := Dm.CliDtSt.FieldByName(´Cli_Cod´).asstring;
De duas uma: ou o FrM1000 ou o Dm não foi criado.
GOSTEI 0
Marco Salles
22/10/2007
Geralmente é recomendado na secção Auto Create Forms , criar primeiros
os DataModulo...
os DataModulo...
GOSTEI 0
Neto
22/10/2007
O FrM1000, não tinha sido criado ainda.
Agora rodou...
Neto
Agora rodou...
Neto
GOSTEI 0
Martins
22/10/2007
O FrM1000, não tinha sido criado ainda.
Agora rodou...
Neto
Blz, valew por ter voltado para informar q conseguiu resolver e como.
bons códigos.
GOSTEI 0