[lazarus] The registry is alive

Luis R. Hilario B. luis at luis-digital.8m.com
Fri Nov 10 19:23:06 EST 2000


Jeff Wormsley wrote:
> 
> On 11/10/2000 at 11:38 AM Luis R. Hilario B. wrote:
> 
> >{$IFDEF WIN32}
> >  Val  := RegDeleteKey(fRootKey, KeyP);
> >{$ELSE}
> >  Val := 1;
> >  //  Val := XMLRegDeleteKey(fRootKey, KeyP); ???
> >{$ENDIF}
> >  If Val = 0 Then Result := True else Result := False;
> 
> Does anyone else use this form below?
> 
> {$IFDEF WIN32}
>   Result := (RegDeleteKey(fRootKey, KeyP) = 0);
> {$ELSE}
>   Result := False;
>   //  Result := (XMLRegDeleteKey(fRootKey, KeyP) = 0); ???
> {$ENDIF}
> 
> I find that eliminating the intermediates is somehow "cleaner".
> 
> Sorry not to comment on the issue at hand, however...

It worked.
Really which was the "trick"?  ((LongInt) = 0) ?
I do not know OOP nor Delphi. Days ago I obtained Delphi 5 (Demo) from
the site of Borland, to learn.

Thanks Jeff. 

-- 
 |--------------------------|
| Luis R. Hilario            |
| http://luisdigital.2y.net  |
 |--------------------------|






More information about the Lazarus mailing list