E2010 Incompatible types: Char and AnsiChar
15/10/2013
0
mas está dando uma seguinte mensagem compilar :
E2010 Incompatible types: ''Char'' and ''AnsiChar''
no seguinte código :
function AnsiUpperFirstChar(const S: string): string;
var
Temp: string[1];
begin
Result := AnsiLowerCase(S);
if S <> '''' then begin
Temp := Result[1];
Temp := AnsiUpperCase(Temp);
Result[1] := Temp[1];
end;
end;se alguém souber de algo, peço por favor me ajudem, ta difícil a coisa hehehe.
abraços
Luis Flores
Posts
15/10/2013
Marcos Oliveira
Att,
Marcos
20/04/2015
Nildglan Sousa.
se sim como vc resolveu?
Marcão vc poderia da exemplo pra nós de como ficaria?
function AnsiUpperFirstChar(const S: string): string;
var
Temp: string[1];
begin
Result := AnsiLowerCase(S);
if S <> '''' then begin
Temp := Result[1];
Temp := AnsiUpperCase(Temp);
Result[1] := Temp[1];
end;
end;
20/04/2015
Marcos P
function AnsiUpperFirstChar(const S: AnsiString): AnsiString; var Temp: AnsiString[1]; begin Result := AnsiLowerCase(S); if S <> '''' then begin Temp := Result[1]; Temp := AnsiUpperCase(Temp); Result[1] := Temp[1]; end; end;
20/04/2015
Thiago Santana
Clique aqui para fazer login e interagir na Comunidade :)