[Delphi] formatowanie liczb

[Delphi] formatowanie liczb

Wątek zablokowany 2016-08-21 03:58 przez flowCRANE .

  • Rejestracja: dni
  • Ostatnio: dni
0

Jak można sformatować liczbę rzeczywistą np.
1000 do postaci 1 000,00

Pozdrawiam !

--
Jak można klawiszem "ENTER " przjć z komponentu np. edit1 do edit2 na tym samym formularzu ?

  • Rejestracja: dni
  • Ostatnio: dni
0

if Key = VK_RETURN then
begin
Key:= 0;
PostMessage(Handle, WM_NEXTDLGCTL, 0, 0);
end;

klawisz zamieniasz na 0 i wysyłasz przejście do następnego kom--Delphi 6; Pozdrawiam eSka :-)

  • Rejestracja: dni
  • Ostatnio: dni
0

var
Ulamek : extended;
calkowita : Integer;
begin
Ulamek:= calkowita div 100;
end;

//jeżeli chcesz zamienić exteneded na string to wpisz floattostr(ulamek);--Delphi 6; Pozdrawiam eSka :-)

  • Rejestracja: dni
  • Ostatnio: dni
0

function FormatFloat(const Format: string; Value: Extended): string;
czyli twoj przypadek:
FormatFloat('0.00' , 1000);--wiem że nic nie wiem ;)
Pozdrowienia Chodek

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.