165 |
// 'Test' skal vise alarmlinie, samt opdatere listbox1 |
// 'Test' skal vise alarmlinie, samt opdatere listbox1 |
166 |
// 'Timer' skal kun vise alarmlinie |
// 'Timer' skal kun vise alarmlinie |
167 |
|
|
168 |
if (PrinterNavn = 'Ingen') and ( (tjektype = 'Opstart') or (tjektype = 'Test') ) then |
// if (PrinterNavn = 'Ingen') and ( (tjektype = 'Opstart') or (tjektype = 'Test') ) then |
169 |
begin |
// begin |
170 |
|
// |
171 |
parentForm.LogMessage( 'Der er fravalgt printer i dette program' ); |
// parentForm.LogMessage( 'Der er fravalgt printer i dette program' ); |
172 |
end |
// end |
173 |
else if (Printer.Printers.Count = 0) and ( (tjektype = 'Opstart') or (tjektype = 'Test') ) then |
// else |
174 |
|
if (Printer.Printers.Count = 0) and ( (tjektype = 'Opstart') or (tjektype = 'Test') ) then |
175 |
begin |
begin |
176 |
parentForm.LogMessage( 'Der er ikke installeret en printer på denne PC' ); |
parentForm.LogMessage( 'Der er ikke installeret en printer på denne PC' ); |
177 |
end |
end |