6 Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms,
\r
7 Dialogs, StdCtrls,GnokiiAPI,MainUnit;
\r
10 TLogosRingForm = class(TForm)
\r
13 ComboBox3: TComboBox;
\r
15 procedure Button1Click(Sender: TObject);
\r
16 procedure Button2Click(Sender: TObject);
\r
18 { Private declarations }
\r
20 { Public declarations }
\r
24 LogosRingForm: TLogosRingForm;
\r
30 procedure TLogosRingForm.Button1Click(Sender: TObject);
\r
32 ComboBox3.Visible:=true;
\r
33 LogosRingForm.Close;
\r
36 procedure TLogosRingForm.Button2Click(Sender: TObject);
\r
38 ComboBox3.Visible:=false;
\r
39 LogosRingForm.Close;
\r