Liga não ... eu queimei a mufa pra reparar o erro, principalmente pq eu
estava me ligando principalmente na msg que o delphi exibia. Mas, como eu já
tinha resolvido antes, não custava nada te falar o que tinha de errado :)
Abs.
Daniel A. Bastos
Em 26/09/07, escobar <[EMAIL PROTECTED]> escreveu:
>
> Put´s, mato a PAU!!!...
>
> É tava cansado... falta de café é foda.. rsrsrs
>
> valeu, abraços...
>
> Luiz Escobar (home)
>
> Wed, 26 Sep 2007 20:41:06 -0300, "Daniel Bastos" escreveu:
>
>
> O problema me parece bem simples meu caro.
> Na declaração da function, no implementation vc está colocando o nome da
> classe errado.
>
> sua declaração no type está assim:
> ---------------------------------------------------------
> type
> TAllToStr = class(TComponent)
> . . .
> protected
> function ReturnTypeAndNull( var oldvalue : string; bool: Boolean;
> StrTypeName, ValueReturnNull, ValueNotReturnNull, ValorNotNull : string )
> : string;
>
> E sua declaração no implementation está desta forma:
> ---------------------------------------------------------
> function AllToStr.ReturnTypeAndNull( var oldvalue : string; bool: Boolean;
> StrTypeName, ValueReturnNull, ValueNotReturnNull, ValorNotNull : string )
> :
> string;
>
> Note que na declaração do implementation o nome da classe está errado.
> Falta
> um "T" antes.
> O problema é que, o delphi exibe a msg "[DCC Error] Unit1.pas(23): E2023
> Function needs result type" no momento da compilação como erro.
> Esta msg acaba confundindo a pessoa que está lendo, pois o erro não
> corresponde a msg.
>
> Abs.
> Daniel A. Bastos
>
> Em 26/09/07, [EMAIL PROTECTED] <escobar%40megasistema.com.br> <
> [EMAIL PROTECTED] <escobar%40megasistema.com.br>>
> escreveu:
> >
> > declarei a seguinte function no meu componente:
> >
> > type
> > TAllToStr = class(TComponent)
> > private { Private declarations }
> > // bla bla bla bla...
> >
> > protected { Protected declarations }
> > function ReturnTypeAndNull( var oldvalue : string; bool: Boolean;
> > StrTypeName, ValueReturnNull, ValueNotReturnNull, ValorNotNull : string
> )
> > : string;
> >
> > // bla bla bla bla....
> > Implementation
> > // bla bla bla bla....
> >
> > // extamente na linha mais abaixo dá o seguinte erro:
> > // [Error] variable.pas(80): Function needs result type
> > // bom isso só deveria dar se o ': string' não estive-se no final da
> > function como esta!
> > // e ai ? alguem sabe o pq ?
> > function AllToStr.ReturnTypeAndNull( var oldvalue : string; bool:
> Boolean;
> >
> > StrTypeName, ValueReturnNull, ValueNotReturnNull, ValorNotNull : string
> )
> > : string;
> >
> > Luiz Escobar - Analista/Desenvolvedor:
> > WEB - HTML/JavaScript/PHP/MySQL
> > WINDOWS - Delphi/ASSEMBLER/MySQL/xBase
> > SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse10.2), Windows
> 2K/XP
> >
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
[As partes desta mensagem que não continham texto foram removidas]
