07.06.2015 Views

Untitled - Vitajte na stránkach www.einsty.hostujem.sk

Untitled - Vitajte na stránkach www.einsty.hostujem.sk

Untitled - Vitajte na stránkach www.einsty.hostujem.sk

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

S O F T W A R E<br />

COMMON CONTROLS<br />

TabControl, PageControl, ImageList, TrackList, TrackBar, ProgressBar, Tree-<br />

View, ListView, HeaderControl, StatusBar, ToolBar, TextViewer, TextBrowser,<br />

SpinEdit, IconView<br />

DIALOG<br />

OpenDialog, SaveDialog, FontDialog, ColorDialog, FindDialog, ReplaceDialog<br />

V prípade, že vám uvedené komponenty nestaèia, môžete si vytvori vlastné<br />

alebo h¾ada <strong>na</strong> internete. Na stránke <strong>www</strong>.torry.net (linka 5) nájdete hneï<br />

nieko¾ko komponentov, rozdelených do štyroch základných kategórií.<br />

PROGRAM HELLO WORLD<br />

HelloWorld_Color.dpr<br />

program HelloWorld_Color; {File HelloWorld_Color.dpr}<br />

uses<br />

QForms,<br />

HelloWorld in ‘HelloWorld.pas’ {Form1};<br />

begin<br />

Application.Initialize;<br />

Application.CreateForm(TForm1, Form1);<br />

Application.Run;<br />

end.<br />

HelloWorld.pas<br />

unit HelloWorld; {File HelloWorld.pas}<br />

interface<br />

uses<br />

SysUtils, Types, Classes, Variants, QGraphics, QControls,<br />

QForms, QDialogs, QStdCtrls, QColorComboBox;<br />

type<br />

TForm1 = class(TForm)<br />

Label1: TLabel;<br />

ColorDialog1: TColorDialog;<br />

procedure Label1Click(Sender: TObject);<br />

procedure FormClick(Sender: TObject);<br />

private<br />

{ Private declarations }<br />

public<br />

{ Public declarations }<br />

end;<br />

var<br />

Form1: TForm1;<br />

implementation<br />

{$R *.xfm}<br />

procedure TForm1.Label1Click(Sender: TObject);<br />

begin<br />

if ColorDialog1.Execute then<br />

Label1.Font.Color := ColorDialog1.Color;<br />

end;<br />

procedure TForm1.FormClick(Sender: TObject);<br />

begin<br />

if ColorDialog1.Execute then<br />

Form1.Color := ColorDialog1.Color;<br />

end;<br />

end.<br />

HelloWorld.xfm<br />

object Form1: TForm1<br />

Left = 271<br />

Top = 171<br />

AutoScroll = False<br />

BorderStyle = fbsSingle<br />

Caption = ‘Simple Application’<br />

ClientHeight = 120<br />

ClientWidth = 340<br />

Color = clBackground<br />

Constraints.MaxHeight = 120<br />

Constraints.MaxWidth = 340<br />

Constraints.MinHeight = 120<br />

Constraints.MinWidth = 340<br />

Position = poDe<strong>sk</strong>topCenter<br />

Scaled = False<br />

OnClick = FormClick<br />

PixelsPerInch = 75<br />

object Label1: TLabel<br />

Left = 23<br />

Top = 30<br />

Width = 294<br />

Height = 60<br />

Caption = ‘Hello World!’<br />

Color = clMidlight<br />

Font.Color = clBlack<br />

Font.Height = 50<br />

Font.Name = ‘urw-new century schoolbook’<br />

Font.Pitch = fpVariable<br />

Font.Style = [fsUnderline]<br />

Ma<strong>sk</strong>ed = True<br />

ParentColor = False<br />

ParentFont = False<br />

Transparent = True<br />

OnClick = Label1Click<br />

end<br />

object ColorDialog1: TColorDialog<br />

end<br />

end<br />

V programe boli použité dva<br />

základné komponenty – Color-<br />

Dialog a Label. Ak kliknete <strong>na</strong><br />

text „Hello World!“, otvorí sa<br />

okno s možnos ou vybra farbu<br />

písma, to isté platí pre farbu formulára.<br />

Po vybratí farby sa vykoná<br />

zme<strong>na</strong> podkladu formulára,<br />

Obr. 4 Výstup programu HelloWorld<br />

resp. sa zmení farba textu. Keï sa pozriete <strong>na</strong> predchádzajúci kód programu, zistíte,<br />

že jediný rozdiel oproti programu <strong>na</strong>písanému v Delphi je v definícii jednotiek<br />

(pozri riadok s uses). Namiesto Forms sa používa QForms, <strong>na</strong>miesto Dialogs<br />

sa používa QDialogs atï. Táto vlastnos umožòuje pomerne jednoduché portovanie<br />

aplikácií z Windows <strong>na</strong> Linux a <strong>na</strong>opak.<br />

MINIMÁLNE SYSTÉMOVÉ POŽIADAVKY<br />

l Intel Pentium 200 MHz (odporúèa sa P2 400 MHz)<br />

l 64 MB RAM (lepšie 128 MB a viac)<br />

l Jednotka CD-ROM<br />

l 120 MB vo¾ného miesta <strong>na</strong> di<strong>sk</strong>u <strong>na</strong> úplnú inštaláciu<br />

l VGA alebo monitor s väèším rozlíšením<br />

l Myš alebo iné polohovacie zariadenie<br />

ZÁVER. Aj keï tento program obsahuje iba základné komponenty, je to jediný<br />

profesionálny vývojový nástroj typu RAD pre Linux. Kylix je urèený <strong>na</strong> vývoj<br />

programov v jazyku Object Pascal. Keïže základom Linuxu je jazyk C, resp.<br />

C++, firma Borland plánuje realizova aj nástroj <strong>na</strong> vývoj programov v tomto<br />

jazyku – C++Builder. Závisí to však zrejme od poètu predaných licencií <strong>na</strong><br />

Server Developer Edition. Kylix podporuje linuxové distribúcie Mandrake 7.2,<br />

RedHat 6.1, 6.2 a 7.0, Suse 7.0 a vyššie. Ïalšie distribúcie, ako <strong>na</strong>pr. Caldera,<br />

budú podporované ne<strong>sk</strong>ôr. Uvedený program bol testovaný <strong>na</strong> distribúcii<br />

RedHat 6.1 (Cartman) s verziou jadra 2.2.12-20. Praktický príklad k dnešnej<br />

èasti nájdete opä <strong>na</strong> <strong>www</strong>.pcrevue.<strong>sk</strong> v sekcii Programujeme/Assembler.<br />

Ukážeme si, ako spracova správy od ovládacieho prvku RadioButton. A <strong>na</strong><br />

úplný záver ešte rada od Vladimíra Michla, týkajúca sa chyby v glibc 2.1.3.<br />

Instaloval jsem Kylix <strong>na</strong> Debian 2.2 a docela jsem si užil, hlavnì s Borlandem. Debian<br />

2.2 Potato obsahuje totiž glibc 2.1.3, která má chybu, se kterou Kylix nejde. V souboru<br />

PREINSTALL píší o nejakém patchi <strong>na</strong> zdrojáky, který tuto chybu opravuje. Bohužel <strong>na</strong><br />

<strong>www</strong>.borland.com se tento patch nedá seh<strong>na</strong>t. Jsou tam pøístupné pøeložené zdrojáky<br />

glibc, pro jmenované distribuce a pro ostatní musíte stáhnout všechny binárky (15, 65,<br />

75 MB) a podívat se, jestli tam náhodou ten patch nepøeložili. Samozøejmì v tom nejmenším<br />

není. Nakonec jsem ten patch seh<strong>na</strong>l (zakomprimovanì 8 KB) a pøeložil glibc i<br />

pro Debian. Binárky s diff <strong>na</strong> originální balíky + diff od Borlandu <strong>na</strong>jdete <strong>na</strong> http://hlubocky.del.cz/downloads/libc6<br />

WEBOVÉ LINKY<br />

1. Registrácia: http://<strong>www</strong>.borland.com/kylix/openedition/<br />

2. Support: http://<strong>www</strong>.borland.com/devsupport/kylix/downloads/<br />

3. Oprava GlibC<br />

l Mandrake 7.2 (71.2MB)<br />

l RedHat 6.1, 6.2 a 7.0 (61.9MB)<br />

l SuSe 7.0 (14.3MB)<br />

4. Kylix FAQ: http://<strong>www</strong>.borland.com/kylix/faqs.html<br />

5. Komponenty pre Kylix: http://<strong>www</strong>.torry.net/<br />

Ing. Peter Gašparoviè<br />

116 PC REVUE 12/2001

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!