Vlastnosti a metody formulß°∙

Na formulß°, s nφm₧ chceme manipulovat, se m∙₧eme odvolßvat t°emi cestami:

pomocφ jmΘna formulß°e, tedy pomocφ jmΘna, pod nim₧ je formulß° vid∞t na °φdicφm panelu aplikace,
pomocφ prom∞nnΘ typu formulß° deklarovanΘ v programu,
pomocφ klφΦovΘho slova thisform, kter²m oznaΦujeme ten formulß°, v n∞m₧ se odkaz nachßzφ.

Prvnφ cesta, tedy odvolßvßnφ se na formulß° pomocφ jmΘna formulß°e, je jednoduÜÜφ, proto₧e nevy₧aduje existenci programu, v n∞m₧ by byla deklarovßna prom∞nnß typu formulß°. Dovoluje vÜak ovlßdat pouze formulß°e otev°enΘ na obrazovce, neumo₧≥uje tedy nap°φklad nastavovat vlastnosti formulß°e p°ed jeho otev°enφm. Pokud na obrazovce otev°ete vφce instancφ stejnΘho formulß°e, neumφ je rozliÜit. Pokusφte-li touto cestou se manipulovat s formulß°em, kter² nenφ otev°en, pak se automaticky otev°e.

Druhß cesta vy₧aduje deklarovßnφ prom∞nnΘ typu formulß°, umo₧≥uje vÜak ovlßdat formulß° i dob∞, kdy nenφ otev°en na obrazovce. Dovoluje tedy nap°φklad upravit polohu a rozm∞ry formulß°e p°ed jeho otev°enφm. NastavenΘ vlastnosti formulß°e se zachovßvajφ i kdy₧ je jeho okno zavφrßno a otevφrßno.

T°etφ cesta slou₧φ pouze pro ten p°φpad, kdy jedna slo₧ka formulß°e odkazuje na slo₧ku jinou nebo na formulß° jako celek.

P°φklad nastavenφ vlastnosti WIDTH (Üφ°ka):

Nech¥ v aplikaci je formulß° BASFORM. Po jeho otev°enφ na obrazovce lze zm∞nit jeho Üφ°ku na 400 pixel∙ p°φkazem

    BASFORM.WIDTH := 400;

Nenφ-li formulß° BASFORM p°i provedenφ tohoto p°φkazu otev°en, automaticky se otev°e a pak se zm∞nφ jeho Üφ°ka.

Nech¥ v projektu je deklarovßna globßlnφ prom∞nnß BASFORMVAR takto:

    VAR BASFORMVAR : FORM BASFORM;

èφ°ku tohoto formulß°e lze nastavit na 400 pixel∙ p°φkazem

    BASFORMVAR.WIDTH := 400;

a¥ je okno s formulß°em zrovna otev°enΘ Φi nikoli. Pokud okno nebylo p°i provedenφ tohoto p°φkazu otev°enΘ, pak p°i nejbli₧Üφm otev°enφ bude mφt nastavenou Üφ°ku 400 pixel∙.

Je-li ve formulß°i tlaΦφtko, jeho₧ funkcφ je nastavit Üφ°ku tohoto formulß°e na 400 pixel∙, pak akci sdru₧enou s tφmto tlaΦφtkem popφÜeme jako:

    THISFORM.WIDTH:=400;

P°φklad:

procedure OtevritInfo;
{*************************************}
var
  cc : cursor;
  ss : string[255];
  lidiform : form X_superlidi;   //deklarace prom∞nnΘ typu formulß°
begin
 ss := "SELECT * FROM Lidi WHERE cislo="+Int2str(cisloCtenare);
 if not Open_sql_cursor(cc,ss) then begin
  lidiform.CursNum := cc;        // nastavenφ zdroje dat (vlastnost)
  lidiform.Editable := false; 
  if not lidiform.Open(NIL)      // otev°enφ (metoda) 
    then Info_box("Chyba","Otev°enφ");     
  end;
end;

PokraΦovßnφ:	Vlastnosti formulß°e
	Metody formulß°e

Seznam subsekcφ:

ObjektovΘ programovßnφ

Formulß°e, sestavy a grafy (pohledy)

Vlastnosti a metody složek formulß°∙