Table of Content
HAL Forum
procedure GetPrevWindowRecord (
Integer wn,record FileName)
Description:
This procedure gets specified Window number and returns Window's contents before editing has started
Parameters:
wn Window Number,every open Window has got its Number, here you specify from which Window you want to get Record
FileName any Vc or Block, Variable of Record Type(Register/Block Name), in example it is CLOutVc Record
global 
function Boolean CLOutDClassDeleteRowTest(Integer wn,Integer rownr)
begin
  record CLOutVc CLOutr;
  Boolean res;

  res = true;
  if (WindowState(wn)==2) then begin//Rs_update
    GetPrevWindowRecord(wn,CLOutr);    
    if (CLOutr.OKFlag!=0) then begin res = false; end;
  end;
LCLOutDClassDeleteRowTest:;  
  CLOutDClassDeleteRowTest = res;
  return;
end;
Related topics:
««