With commondlg .HelpFile = "filename.chm" .HelpCommand = &HB .ShowHelp End WithAs you can see, this syntax is very clear. The leading dots indicate which parameters are associated with commondlg.
type TDate = record Day : Integer; Month: Integer; Year : Integer; end; var OrderDate: TDate; with OrderDate do if Month = 12 then begin Month := 1; Year := Year + 1 end else Month := Month + 1;Since this syntax is fairly confusing, I strongly suggest not using it!
On the other hand, it is supposed to execute faster since the pointer to OrderDate is computed only once and not for each reference.