[firebase-br] Problema com UDF + linux
Eduardo Jedliczka (TeamFB)
jedyfb em gmail.com
Qua Jan 25 17:52:35 -03 2006
Desculpa a minha ignorância, mas você está compilando este código em qual
linguagem ?
Definir ThousandSeparator e DecimalSeparator só funcionam (tanto no Kylix
quanto no FreePascal) após um application.processmessages...
Sendo assim (como isto é uma UDF) recomendaria você escrever a função com
concatenação de String ao invés de utilizar uma função pronta.
Sucesso,
=========================
Eduardo Jedliczka
Membro do TeamFB - FireBase
Apucarana - Pr
=========================
----- Original Message -----
From: "Fabrício Fadel Kammer" <ffkammer em conchalnet.com.br>
To: <lista em firebase.com.br>
Sent: Wednesday, January 25, 2006 4:46 PM
Subject: [firebase-br] Problema com UDF + linux
Boa tarde,
Estou fazendo uma UDF para formatação de números, uma função que
funcione similar a FormatFloat do Delphi, só que o resultado sempre vem
com o PONTO como separador decimal e não a vírgula.
Mesmo que eu defina a variável DecimalSeparator = ',' o resultado vem
com o PONTO separando as casas decimais.
Alguém sabe como resolver isso??? Preciso da vírgula como separador
decimal.
Minha função:
function F_FormatFloat(Format: PChar; var Value: Double; SemPontos:
SmallInt = 0 ): PChar;
begin
ThousandSeparator := '.';
DecimalSeparator := ',';
Result := MakeResStr(PChar(FormatFloat( Format, Value ) ), nil, 0);
end;
Grato,
Fabrício
______________________________________________
FireBase-BR (www.firebase.com.br) - Hospedado em www.bavs.com.br
Para editar sua configuração na lista, use o endereço
http://mail.firebase.com.br/mailman/listinfo/lista_firebase.com.br
Para consultar mensagens antigas: http://firebase.com.br/pesquisa
Mais detalhes sobre a lista de discussão lista