Simpre pensé que si esa información estuviera disponible, no existirían esas constantes en Delphi. Por el lado de la información local no hay nada de eso, , seguramente este texto pertenece a los recursos de algúno de los módulos del sistema, entonces podrías obtener el Handle de alguno de estos módulos hModule y enumerar sus recursos, yo he probado este vago código sin éxito:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var
hMod: HMODULE;
pText: PChar;
i,
iLen: Integer;
begin
hMod := GetModuleHandle(PChar(Edit1.Text));
if hMod = 0 Then
Memo1.Clear
else
begin
pText := StrAlloc(MAX_PATH);
try
for i := 0 to 65535 do
begin
iLen := LoadString(hMod, i, pText, MAX_PATH);
if iLen > 0 Then
Memo1.Lines.Add(IntToStr(i) + '> ' + String(pText));
end;
finally
StrDispose(pText);
end;
end;
end;
Solo encotré un Aceptar en el recurso 4161 de las common controls, obviamente ese no es el que buscas.
Es solo una idea que pude llegar a servirte.
Saludos!