Difference between revisions of "How To Write Lazarus Component/hu"

From Free Pascal wiki
Jump to navigationJump to search
Line 22: Line 22:
 
* Válaszd mondjuk például a ''customcontrol1.pas'' fájlnevet.
 
* Válaszd mondjuk például a ''customcontrol1.pas'' fájlnevet.
 
* Kattints OK gombra.
 
* Kattints OK gombra.
 +
 +
<syntaxhighlight>unit CustomControl1;
 +
 +
{$mode objfpc}{$H+}
 +
 +
interface
 +
 +
uses
 +
  Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, StdCtrls;
 +
 +
type
 +
  TCustomControl1 = class(TComboBox)
 +
  private
 +
    { Private declarations }
 +
  protected
 +
    { Protected declarations }
 +
  public
 +
    { Public declarations }
 +
  published
 +
    { Published declarations }
 +
  end;
 +
 +
procedure Register;
 +
 +
implementation
 +
 +
procedure Register;
 +
begin
 +
  RegisterComponents('Standard',[TCustomControl1]);
 +
end;
 +
 +
end.</syntaxhighlight>
 +
 +
 +
* Telepítsd a csomagot az 'Install' gombbal amely a package editor tetején van.
 +
[[Image:package_install.png]]
 +
 +
* Utána az IDE meg kérdezi tőled, hogy maga az IDE újra fordítódjon-e. Nekünk most ez kell, kattints a 'Yes' -re.

Revision as of 18:03, 25 August 2012

Bevezetés

Ez egy alap útmutató. Abban segít, hogy létre tudjunk hozni saját komponenseket. A művelet Windows 7 -en lett tesztelve Lazarus 0.9.30 segítségével.

1. lépés: Csomag létrehozása

  • A Lazarus IDE menüjén kattints a Package > New Package menüelemre, hogy futtasd Package Manager -t.

package menu.png

  • Egy Save dialog fog megjelenni. Válassz egy mappát, és egy fájlnevet majd nyomd meg a save(mentés)-t. Ha az IDE szól, hogy kisbetűs legyen a fájlnév, nyomj 'Yes'-t.
  • És gratulálok, elkészítetted az első csomagod.

Package Maker

2. lépés: Unit készítése

Csinálhatsz egy új unitot vagy használhatsz egy már meglévőt.

Új unit készítése

  • Használd az Add button > New component lehetőséget.

package new component.png

  • Válassz egy komponenst, például TComboBox.
  • Válaszd mondjuk például a customcontrol1.pas fájlnevet.
  • Kattints OK gombra.
unit CustomControl1;

{$mode objfpc}{$H+}

interface

uses
  Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, StdCtrls;

type
  TCustomControl1 = class(TComboBox)
  private
    { Private declarations }
  protected
    { Protected declarations }
  public
    { Public declarations }
  published
    { Published declarations }
  end;

procedure Register;

implementation

procedure Register;
begin
  RegisterComponents('Standard',[TCustomControl1]);
end;

end.


  • Telepítsd a csomagot az 'Install' gombbal amely a package editor tetején van.

package install.png

  • Utána az IDE meg kérdezi tőled, hogy maga az IDE újra fordítódjon-e. Nekünk most ez kell, kattints a 'Yes' -re.
Retrieved from "http://wiki.freepascal.org/index.php?title=How_To_Write_Lazarus_Component/hu&oldid=60957"