ATNEL tech-forum

Re: Delphi - zamiana strtofloat z transmisji po RS232

2018-09-21T11:07:58+01:00

No, problem był w tym, że kompilator wyrzucał błąd. Nie dołączyłem biblioteki.
Obecnie działa.

Statystyki: Napisane przez kkarl — 21 wrz 2018, o 11:07

Re: Delphi - zamiana strtofloat z transmisji po RS232

2018-09-21T08:07:06+01:00

kkarl napisał(a):

No chyba, że w delphi można jakoś zamienić otrzymany string "3.5" na "3,5" , wtedy to zadziała.

No panie kochany, toż to PODSTAWOWE operacje na stringach - co za problem zamienić sobie w odebranym string jakiś znak na inny ? w czym problem ?

Oczywiście jest wiele innych sposobów, tak jak np wyżej pisze kolega - ale specjalnie nie pisałem o tym wcześniej bo coś czułem, że ty na razie chyba masz jeszcze problem z podstawową obróbką stringów w Delphi - polecam ci zacznij od tego.

Statystyki: Napisane przez mirekk36 — 21 wrz 2018, o 08:07

Re: Delphi - zamiana strtofloat z transmisji po RS232

2018-09-21T07:14:20+01:00

Albo tak:
[syntax=delphi]FormatSettings.DecimalSeparator := '.';
WartoscFloat := StrToFloat(StringZUrzadzenia);
FormatSettings.DecimalSeparator := ',';[/syntax]

Albo użyj drugiej wersji funkcji StrToFloat, gdzie możesz podać własny format separatora dziesiętnego:
[syntax=delphi]function StrToFloat(const S: string; const AFormatSettings: TFormatSettings): Extended;[/syntax]

Statystyki: Napisane przez MarcinG — 21 wrz 2018, o 07:14

Re: Delphi - zamiana strtofloat z transmisji po RS232

2018-09-20T14:38:45+01:00

Popracuję wieczorem, dam znać.

-- dzisiaj, o 14:38 --

1. po stronie pierwotnej(nadawczej) mam program napisany w Bascomie i liczba rzeczywista ma kropkę.
2. po stronie wtórnej(odbiorczej) jest Delphi, który oczekuje przecinka.

Jeżeli wyślę text(string) postaci np."3,5" , konwersja do liczby w delphi jest prawidłowa, ale text muszę napisać ręcznie. Natomiast konwersja poprzez funkcję STR (Bascom) liczby na string daje wynik/text postaci "3.5" . Tym razem tego delphi nie trawi i koło się zamyka.

No chyba, że w delphi można jakoś zamienić otrzymany string "3.5" na "3,5" , wtedy to zadziała.
Oczywiście wartość liczbowa 3.5 jest przykładowa.
Jeżeli wie Pan jak to zrobić Panie Mirku, to poproszę o podpowiedź.

Statystyki: Napisane przez kkarl — 20 wrz 2018, o 14:38

Re: Delphi - zamiana strtofloat z transmisji po RS232

2018-09-20T14:34:46+01:00

no i co z tego ? a kto ci zabroni zmienić kropkę na przecinek po obojętnie której stronie ?

Statystyki: Napisane przez mirekk36 — 20 wrz 2018, o 14:34

Re: Delphi - zamiana strtofloat z transmisji po RS232

2018-09-20T13:34:21+01:00

Hm, ale reprezentacja liczby po stronie pierwotnej(źródła wysyłającego) jest postaci z kropką (np. 3.5).

Statystyki: Napisane przez kkarl — 20 wrz 2018, o 13:34

Re: Delphi - zamiana strtofloat z transmisji po RS232

2018-09-20T12:20:37+01:00

separator zmień

Statystyki: Napisane przez mirekk36 — 20 wrz 2018, o 12:20

Delphi - zamiana strtofloat z transmisji po RS232

2018-09-20T11:05:40+01:00

Chcę wysłać liczbę(np. wartość 3.5) po RS232.
Zaczynam tak:
1. Wysyłam z avr (Atmega8) po rs232 jako znaki 3.5 (zresztą bez znaczenia czy jako text czy liczbę wprost).
2. W Delphi robię odczyt przez comport i wyświetlam na komponencie Memo1 znak(i) 3.5 - jest ok.
3. Następnie znaki z komponentu Memo1 chcę zamienić na wartość liczbową real przez StrToFloat i mam błąd. Zamiana nie następuje.
mam komunikat, że 3.5 nie można zamienić na typ real.
4. Jeżeli prześlę po RS232 liczbę typu Integer, to z zamianą StrToInt nie ma problemu. Problem jest z liczba niecałkowitą(typu real).

Poproszę o pomoc.

Statystyki: Napisane przez kkarl — 20 wrz 2018, o 11:05