Модуль "Kjava" (часть 1) - определение переменных и типов данных

Рубрика: Исходники
Среда, 21 апреля 2010 г.
Просмотров: 375
последняя версия: 3.0.9 build 961 beta
от 07 декабря 2007 г.
unit uKJava;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, 
  Dialogs, DynamicSkinForm, SkinCtrls, StdCtrls, uKJavaStructs;
type
  TfrmP2KKJava = class(TFrame)
    spSkinFrame1: TspSkinFrame;

    OpenDialog1: TOpenDialog;
    SaveDialog1: TSaveDialog;
    Panel1: TspSkinPanel;
    spSkinPanel3: TspSkinPanel;
    Button1: TButton;
    Memo1: TMemo;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
    function GetKJava(ADrive: string; AImei: string; var ASize: integer): boolean;
    procedure NullKJava;
  end;
var
  frmP2KKJava: TfrmP2KKJava;
  xJ2MEST_372: array [1..31] of TJ2MEST_372;
  xJ2MEST_373: array [1..31] of TJ2MEST_373;
  xJ2MEST_300: array [1..31] of TJ2MEST_300;
  xJ2MEST_E1000: array [1..31] of TJ2MEST_E1000;
  xJ2MEST_3x: array [1..31] of TJ2MEST_3x;
  xJ2MEST_K1: array [1..31] of TJ2MEST_K1;
  xJ2MEST_3x86: array [1..31] of TJ2MEST_3x86;
implementation
uses uMain, uLng, ufrmProgress, uP2KAPI, uSpecialUtils;
{$R *.dfm}
Rambler's Top100