Вниз
Скачать: CL | DM;

Аналог IntToStr в Turbo Pascal   Найти похожие ветки 

← →
Шишкин Илья ©   (2004-10-27 16:23) [0]

Сабж. Существует такое? Или надо писать самому? Пытался взять код из Delphi, но он не работает.

function IntToStr(Value: Integer): string;
//  FmtStr(Result, "%d", [Value]);
asm
       PUSH    ESI
       MOV     ESI, ESP
       SUB     ESP, 16
       XOR     ECX, ECX       // base: 0 for signed decimal
       PUSH    EDX            // result ptr
       XOR     EDX, EDX       // zero filled field width: 0 for no leading zeros
       CALL    CvtInt
       MOV     EDX, ESI
       POP     EAX            // result ptr
       CALL    System.@LStrFromPCharLen
       ADD     ESP, 16
       POP     ESI
end;

Как я понял он работает только в 32-разрядных системах


← →
Ega23 ©   (2004-10-27 16:24) [1]

Val и Str


← →
ИМХО ©   (2004-10-27 16:54) [2]

я не понял, кто-то еще юзает среду Турбо Паскаль?

даже в Гондурасе уже все на нее (среду) забили


← →
TUser ©   (2004-10-27 16:58) [3]


> кто-то еще юзает среду Турбо Паскаль?

И довольно многие


← →
jack128 ©   (2004-10-27 16:58) [4]

ИМХО ©   (27.10.04 16:54) [2]
В Гондурасе - может быть, а в российских школах/институтах изучают..


← →
Palladin ©   (2004-10-28 00:36) [5]

изучали бы - подобных вопросов на форуме меньше было...


← →
GuAV ©   (2004-10-28 01:30) [6]

Palladin ©   (28.10.04 0:36) [5]
подобных вопросов на форуме меньше было...

ИМХО больше.


← →
Германн ©   (2004-10-28 04:37) [7]

А я опять о том же. Об ребятах из TurboPower. Они сделали все или почти все, что бы программы на Турбо Паскаль были максимально хорошие.

Ищите TurboProfessional! Там найдете ответы на все (или почти все) вопросы по Турбо Паскалю.

А вообще-то см. Ega23 ©   (27.10.04 16:24) [1]
Лучше сделать трудно.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.038 c
3-1098107551
Andrey_
2004-10-18 17:52
2004.11.14
Загрузка рисунка из ttable в image


9-1089915239
Колбасьев
2004-07-15 22:13
2004.11.14
Подскажите как масштабировать модель (имеется ввиду X Mesh).


14-1098699704
Жук
2004-10-25 14:21
2004.11.14
Опять про мобилы


10-1063603897
Dred2k
2003-09-15 09:31
2004.11.14
Delphi7, COM-сервер и Windows98 - странное творится


3-1097651444
_sulent
2004-10-13 11:10
2004.11.14
Объединение ячеек




   Наверх