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

Вниз

Принтер не печатет в Win98, по команде WriteLn   Найти похожие ветки 

 
Gennadiy ©   (2003-04-02 19:59) [0]

Уважаемые мастера!!!
Подскажите почему данный код работает в Windows 2000, а в Windows 98 не работает.
procedure TForm1.SpeedButton3Click(Sender: TObject);
PrFile:TextFile;
begin
If PrintDialog1.Execute then
begin
AssignPrn(PrFile);
ReWrite(PrFile);
WriteLn(PrFile, "любые данные");
System.CloseFile(PrFile);
end;
end;


 
Mike Kouzmine ©   (2003-04-02 20:09) [1]

А принтер как настроен?


 
Song ©   (2003-04-02 21:32) [2]

Принтер наверно лазерный?


 
Gennadiy ©   (2003-04-03 10:29) [3]

Принтер струйный


 
ZmeiGorin ©   (2003-04-03 10:33) [4]

Брр... процедурный подход... Да и процедуры какие-то левые :-)
А что значит работает/не работает?



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

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

Наверх




Память: 0.47 MB
Время: 0.015 c
14-44333
Sid
2003-03-30 20:35
2003.04.14
Что такое F1Book в Delphi 6


6-44298
shil
2003-02-18 15:05
2003.04.14
Indy 9 Помогите с ошибка при стандартном чтении


1-44166
BBCHa
2003-04-03 17:54
2003.04.14
Рамочка вокруг контрола как в Design-time


1-44228
Danger
2003-04-02 00:28
2003.04.14
Поиск в Richedit


1-44219
StarCon
2003-04-01 09:38
2003.04.14
XL := CreateOleObject( Excel.Application );