Fórum criando componente records #269421
21/02/2005
0
Pessoal, bom dia.
Estou fazendo um componente que tratar arquivos textos, e dependendo dos dois primeiros de cada linha, eu preciso fazer tratamentos diferentes.
Para isso, estou fazendo records na sessao private, porem, quando tento criar as funcoes e procedures, ele dah a seguinte mensagem: ´Expected END but TYPE found in class TClasseCriada´ ...
Jah verifiquei se falta End em algum ponto, porém nao achei nada. Alguém sabe se é possível criar Records na sessao private da minha classe ou só consigo criar fora da classe ?
Estou fazendo um componente que tratar arquivos textos, e dependendo dos dois primeiros de cada linha, eu preciso fazer tratamentos diferentes.
Para isso, estou fazendo records na sessao private, porem, quando tento criar as funcoes e procedures, ele dah a seguinte mensagem: ´Expected END but TYPE found in class TClasseCriada´ ...
Jah verifiquei se falta End em algum ponto, porém nao achei nada. Alguém sabe se é possível criar Records na sessao private da minha classe ou só consigo criar fora da classe ?
Rod001
Curtir tópico
+ 0
Responder
Posts
21/02/2005
Nildo
Record tem que ficar dentro da seção TYPE. Por exemplo:
Espero ter ajudado.
type
TSeuRecord = record
var1: string;
var2: Integer;
end;
TSeuComponente = class
private
SeuRecord = TSeuRecord;
(...)
end;
Espero ter ajudado.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)