Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > Вывод текста: Pascal

Автор: Vco 31.10.2003, 21:31

Написал процедуру вывода текста всмысле по буквенно через задержку в модуле:

Код


unit name;

interface

type
big_Text=array[1..100] of char;

procedure show_text(my_Text:big_Text);

implementation

uses crt;


procedure show_text(my_text:big_Text);

var i:word;

begin
for i:=1 to length(my_text) do
begin
write(my_text[i]);
delay(100);
end;

end;


end.

знаю что всё коряво, но пишу в другой программе:

Код


uses name;
begin
show_Text('fdsfsd');
end;

Type mismatch
Что не так

Автор: Pakshin A. S. 31.10.2003, 21:36

1) В Turbo Pascal лучше писать string[100] или вообще string
2) Если не в TurboPascal, то packed array [1..100] of char;
3) В основном модуле программы завести переменныю типа big_Text

Автор: Pakshin A. S. 31.10.2003, 21:37

А вообще каков смысл ентой затеи?