Главная страница
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.02 c
2-1190363813
Flood_control
2007-09-21 12:36
2007.10.21
Edit & UpDown


2-1190971347
Gigik
2007-09-28 13:22
2007.10.21
Двоичные файлы


2-1190726454
R.O.O.T
2007-09-25 17:20
2007.10.21
Обработка исключений в TSocketConnection


15-1190313580
Int128
2007-09-20 22:39
2007.10.21
Почему в крупе заводятся насекомые?


15-1190196831
de.
2007-09-19 14:13
2007.10.21
FireBird