Write_unlock_table

Internφ programovacφ jazykC/C++Pascal

function Write_unlock_table(curs : tcurstab) : Boolean;
BOOL [cd_]Write_unlock_table([cdp_t cdp], tcurstab curs);
function [cd_]Write_unlock_table([cdp : cdp_t]; curs : tcurstab) : Boolean;

Parametry

curs otev°en² kurzor nebo tabulka - viz podrobnosti
[cdp kontextovß prom∞nnß klienta]

Popis

Funkce odemkne vÜechny zßznamy tabulky pro zßpis. Pokud uveden² kurzor zahrnuje vφce spojen²ch tabulek, odemknou se vÜechny.

Hodnota funkce

Funkce vracφ p°i ·sp∞chu FALSE, p°i ne·sp∞chu TRUE.

P°φklad

if not Write_lock_table(Tfirma) then begin
  Enable_index(Tfirma,-1,false);                           
  if Enable_index(Tfirma,-1,true) then err := true;        //  p°ebudovßnφ index∙
  Write_unlock_table(Tfirma);
if err then Info_box('Chyba','Chyba p°i vytvß°enφ index∙ v tabulce adres!')
else Info_box('Tabulka adres','OK');

Viz