W FAQ znajduje się przykład na funkcję IntToStr tak by nie trzeba
było korzystać tej z SysUtils. Problem w tym, że przykład ten u mnie
nie chodzi. Pojawia się "Illegal character in input file: '' $A0"
w siedmiu miejscach począwszy od try a skończywszy na end.
Funkcja orginalna oczywiście działa bez zarzutu. Co tu zrobić???
- Rejestracja:około 22 lata
- Ostatnio:ponad 21 lat
0
- Rejestracja:około 22 lata
- Ostatnio:ponad 21 lat
0
Popełniłeś chyba jakiś błąd przy przenoszeniu kodu. $A0 (czyli 160)
to kod non-breaking space, który nie jest dozwolony w Delphi. Zmień na
zwykłą spację
Jak, co, gdzie?? Bo coś nie jarzę.
Oto ten kod:
function IntToStr(Value: Integer): String;
var Str: array[0..255] of char;
begin
wvsprintf(Str, '%d', @Value); //

- Rejestracja:prawie 23 lata
- Ostatnio:około 6 lat
0
Ja tam też nie wiem, co u ciebie nie działa. U mnie pięknie śmiga.
A jeżeli już tak bardzo nie chcesz SysUtils używać to weź procedurkę z asm: http://4programmers.net/view_faq.php?id=286
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.