[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