diff options
Diffstat (limited to 'plugins/Utils.pas')
| -rw-r--r-- | plugins/Utils.pas/dbsettings.pas | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/plugins/Utils.pas/dbsettings.pas b/plugins/Utils.pas/dbsettings.pas index 5e2b5b08fd..4d7da84f2a 100644 --- a/plugins/Utils.pas/dbsettings.pas +++ b/plugins/Utils.pas/dbsettings.pas @@ -159,13 +159,9 @@ begin end;
function DBWriteSetting(hContact:THANDLE;szModule:PAnsiChar;szSetting:PAnsiChar;dbv:PDBVARIANT):int_ptr;
-var
- cws: TDBCONTACTWRITESETTING;
+ {$IFDEF AllowInline}inline;{$ENDIF}
begin
- cws.szModule :=szModule;
- cws.szSetting :=szSetting;
- move(dbv^,cws.value,SizeOf(TDBVARIANT));
- Result := CallService(MS_DB_CONTACT_WRITESETTING, hContact, lParam(@cws));
+ Result:=db_set(hContact, szModule, szSetting, dbv);
end;
function DBWriteByte(hContact:THANDLE;szModule:PAnsiChar;szSetting:PAnsiChar;val:Byte):int_ptr;
|