title: godex ez2250i delphi cant print
body: <p>I have a label printer GoDex EZ2250i and i found some samples with delphi but none seems to works for me i try to compile with couple of dll's and the program doesnt even launch does anyone have experience on printing with this printer with delphi? thanks in advance, also the OS should be supported Windows7 and Windows 8.</p>
  
  <p>the code that i tried:</p>
  
  <pre><code>unit Unit2;
  
  interface
  
  uses
    Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
    Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;
  
  type
    TForm2 = class(TForm)
      Button1: TButton;
      procedure Button1Click(Sender: TObject);
    private
      { Private declarations }
    public
      { Public declarations }
    end;
  
  const
   TestLib = 'Ezio64.dll'; // tried with Ezio32.dll same result
  
   procedure openport(port:PChar); stdcall; external TestLib ;
   procedure setup(a, b, c, d, e, f:Integer); stdcall; external TestLib;
   procedure sendcommand(command:PChar); stdcall; external TestLib;
   procedure intloadimage(filename, image_name, image_type:PChar); stdcall; external TestLib;
   procedure extloadimage(filename, image_name, image_type:PChar); stdcall; external TestLib;
   procedure ecTextOut(x:Integer; y:Integer; b:Integer; c:PChar; d:PChar); stdcall; external TestLib;
   procedure closeport; stdcall; external TestLib;
  
  
  
  var
    Form2: TForm2;
  
  
  implementation
  
  {$R *.dfm}
  
  procedure TForm2.Button1Click(Sender: TObject);
  begin
    openport('0');    // 0-&gt; LPT1; 1-&gt; COM1; 2-&gt;COM2
    setup(30, 7, 2, 1, 0, 0);
    sendcommand('W70');
    sendcommand('^P1');
    sendcommand('^L');
    sendcommand('AC,20,60,1,1,1,0,TEST');
    ecTextOut(20, 10, 34, 'Ariel', 'Windows font - Ariel');
    sendcommand('E');
    closeport();
  end;
  
  end.
  </code></pre>