Einzelnen Beitrag anzeigen

Benutzerbild von Lannes
Lannes

Registriert seit: 30. Jan 2005
Ort: Münster
745 Beiträge
 
Delphi 3 Professional
 
#8

Re: Mehr als 31 Zeichen bei Printer.Title möglich?

  Alt 6. Jul 2009, 14:42
Hallo,

ein Auszug aus Printers.pas von D3, in Delphi Turbo wird dort nicht eingegrenzt.

Delphi-Quellcode:
TPrinter = class(TObject)
//...
  FTitle: string;

//...
procedure TPrinter.BeginDoc;
var CTitle : array[o..31] of Char;//<----!
begin
//...
  StrPLCopy(CTitle, Title, SizeOf(CTitle) - 1);
//...
  with docInfo do
//...
   lpszDocName := CTitle;
Greift Delphi da Windows vor oder wie muss man das interpretieren.

An welcher Stelle schränkt Windows dann ein, wo müsste ich da suchen?
MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )
  Mit Zitat antworten Zitat