Panowie i Panie!
Czy jest możliwość zmiany systemowego symbolu dziesiętnego jakąś krótką procedurką podpiętą np pod kliknięcie buttona?
szukales?
cos mi sie wydaje ze nie bo ja znalazlem to momentalnie uzywajac wyszukiwarki forum i googli.
http://4programmers.net/Forum/Delphi_Pascal/39079-Zanim_cos_napiszesz_-_CZYTAJ_TO
Nie szukał, bo po co...
Z pierwszej stronki w GOOGLE, które jak zgaduję u Ciebie nie działa?.
var
amount : Currency;
begin
amount := 12.34; // 12 pounds 34 pence
// Display with the default decimal point character
ShowMessage('Amount = '+FloatToStrF(amount, ffCurrency, 10, 2));
// Display with a new decimal point character
DecimalSeparator := '|';
ShowMessage('Amount = '+FloatToStrF(amount, ffCurrency, 10, 2));
end;
Tak, i to dość długo. Czyżby do kitu było to moje szukanie? :-/
Już wiem o co chodzi, niedokładnie się wyraziłem czego szukam: czy istnieje możliwość zmiany separatora ustawionego w systemie operacyjnym w ust. regionalnych?
Google dalej nie działa?
http://www.google.pl/search?hl=pl&source=hp&q=delphi+set+decimal+separator+for+windows&aq=f&aqi=&aql=&oq=&gs_rfai= czwarta odpowiedź od góry:
http://www.greatis.com/delphicb/tips/lib/system-setseparator.html
dlatego ja nigdy nie szukam na polskich stronach. najwiecej informacji znajdziesz po angielsku, a jesli go nie znasz to juz nie problem tego forum.
można np. za pomocą skryptu ....
w notatniku wpiszesz sobie
................................................................................................................................
Option Explicit
Dim WSHShell, n, MyBox, p, itemtype, Title, vbdefaultbutton
Set WSHShell = WScript.CreateObject("WScript.Shell")
p = "HKEY_CURRENT_USER\Control Panel\International"
p = p & "sDecimal"
itemtype = "REG_SZ"
n = "."
WSHShell.RegWrite p, n, itemtype
Title = "Separator dziesiętny został zmieniony" & vbCR
Title = Title & "na kropke"
MyBox = MsgBox(Title,64,"Zakończone")
................................................................................................................................
zapisz z rozszerzeniem .vbs
w tym przykładzie skrypt zmienia separator na kropke,
rodzaj separatora ustawiany jest w zmiennej "n"
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.