CodeTyphon in Windows 8.1.
Had een goed werkende applicatie in Delphi7 en heb deze omgezet in CodeTyphon(Lazarus).
Maar LAZARUS geeft errpr:
euroform.pas(299,8) Error: Identifier not found "Printscale"
euroform.pas(299,20) Error: Identifier not found "poprinttofit"
euroform.pas(300,13) Error: identifier idents no member "Print"
In USES staat:
Code:
uses
Windows, Buttons, Classes, Controls, ComCtrls, Dialogs,
ExtDlgs, ExtCtrls, Forms, Graphics, Messages, Menus,
Printers, SysUtils, StdCtrls, Types,
LCLIntf, LCLType, LCLProc, LMessages;
Code:
procedure TFormMain.Print1Click(Sender: TObject);
begin
if Application.messagebox(PChar('Afdrukken'+#13+#10+
'van dit scherm?'),
' MAAK UW KEUZE ...',
MB_OKCANCEL + MB_ICONWARNING + MB_DEFBUTTON1)= ID_OK
then begin
Printscale:=poprinttofit;
Self.Print;
end;
end;
Bookmarks