Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.10.21;
Скачать: CL | DM;

Вниз

Перевод с delphi на turbo pascal   Найти похожие ветки 

 
Ezorcist   (2007-09-23 22:57) [0]

Есть консольная программа на delphi, но препод требует запуска и компиляции из turbo pascal, при "переводе" возникло пару вопросов:

TP не понмает
1)strtoint, strtofloat,floattostr,inttostr, а модуля sysutils тоже не находит
2)F:TEXFILE;

Подскажите пожалуйса


 
palva ©   (2007-09-23 23:01) [1]

1)Изучить использование функций Val и Str
2)F:TEXFILE;
нужно F:TEXT;


 
Ezorcist   (2007-09-24 20:52) [2]

palva

Спасибо, возник еще вопрос по str, она оставляет только первую значащую цифру, остальные выводит как дробную часть, а порядок в виде степени E, как получить в обычном виде, т.е. как floattostr?


 
Джо ©   (2007-09-24 21:15) [3]

> [2] Ezorcist   (24.09.07 20:52)
> palva
>
> Спасибо, возник еще вопрос по str, она оставляет только
> первую значащую цифру, остальные выводит как дробную часть,
> а порядок в виде степени E, как получить в обычном виде,
> т.е. как floattostr?

Где вы вообще берете такие дистрибутивы без справки?

Str (procedure)
----------------
Converts a numeric value to a string.

Declaration:
procedure Str(X [: Width [: Decimals ]]; var S:string);

(с) Turbo Pascal Help.


 
Ezorcist   (2007-09-24 21:31) [4]

2 Джо
Спасибо, теперь разобрался.

И еще вопрос: есть способ вывести на печать массив строк? т.е. на принтер?


 
Однокамушкин   (2007-09-24 22:10) [5]


> Ezorcist   (24.09.07 21:31) [4]
> И еще вопрос: есть способ вывести на печать массив строк?
>  т.е. на принтер?

Надо открыть файл "prn:" как обычный текстовый файл и после этого печатать, используя Write и WriteLn



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

Текущий архив: 2007.10.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.021 c
4-1176887783
ocean
2007-04-18 13:16
2007.10.21
Как развернуть раб. стол WinXP на 270 градусов?


2-1190878733
fff
2007-09-27 11:38
2007.10.21
курсор


2-1190694479
Сергей1985
2007-09-25 08:27
2007.10.21
Подскажите как объединить две таблицы


2-1190789736
l_v
2007-09-26 10:55
2007.10.21
ServerSocket


15-1190611669
Неместный
2007-09-24 09:27
2007.10.21
Детская задачка для С++