SetResourceStringValue

Set value of a resource string

Declaration

Source position: objpas.pp line 92

function SetResourceStringValue(

TableIndex: LongInt;

StringIndex: LongInt;

Value: Ansistring

):Boolean;

Description

SetResourceStringValue assigns Value to the resource string in table TableIndex with index StringIndex.

SetResourceStrings		Set values of all resource strings.
GetResourceStringCurrentValue		Return current value of resourcestring
GetResourceStringDefaultValue		Return default (original) value of resourcestring
GetResourceStringHash		Return hash value of resource string
GetResourceStringName		Return name of resource string.
ResourceStringTableCount		Return number of resource string tables
ResourceStringCount		Return number of resource strins in table

Example

Program Example94;

{ Program to demonstrate the SetResourceStringValue function. }
{$Mode Delphi}

ResourceString

  First  = 'First string';
  Second = 'Second String';

Var I,J : Longint;
    S : AnsiString;

begin
  { Print current values of all resourcestrings }
  For I:=0 to ResourceStringTableCount-1 do
    For J:=0 to ResourceStringCount(i)-1 do
      begin
      Writeln ('Translate => ',GetResourceStringDefaultValue(I,J));
      Write   ('->');
      Readln(S);
      SetResourceStringValue(I,J,S);
      end;
  Writeln ('Translated strings : ');
  For I:=0 to ResourceStringTableCount-1 do
    For J:=0 to ResourceStringCount(i)-1 do
      begin
      Writeln (GetResourceStringDefaultValue(I,J));
      Writeln ('Translates to : ');
      Writeln (GetResourceStringCurrentValue(I,J));
      end;
end.

Notes

 No notes exist for this page yet.

SetResourceStringValue

Declaration

Description

See also

Example

Notes