#23 Delphi SetUserVariable

[Brett Dever]

Thanks so much for including the proc :D

Just as a finicky note, here is a slightly more efficient
version, if you want it:

procedure SetUserVariable(varnum: TVariableList; value:
PChar);
begin
if (value <> nil) and (integer(varnum) >= 0) and
(integer(varnum) < integer(__INST_LAST)) then
lstrcpy(g_variables + integer(varnum)*g_stringsize,
value);
end;

Thanks again :)

[Amir Szekely]

Logged In: YES
user_id=584402

Very finicky indeed :)
Updated.

[Brett Dever]

Logged In: YES
user_id=898384

Lol, sry :P

That's just me. It's a fault when I code anything. I can't let it
be :)

Thanks :D