Скачать: 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 вся ветка

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



Память: 0.45 MB
Время: 0.015 c