Hallo zusammen,
ich bin jetzt seit Mai dabei Delphi zu lernen und dabei bin ich über diesen
Code hier gestolpert. Was ich hier nicht verstehe ist die Funktion Button1.Click
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
retValue : DWORD;
ProcessList : TPIDList;
i : Integer;
ProcessName :
string;
PID : DWORD;
resourcestring // <- diese Stelle
rsUnknown = '
unbekannt';
begin
// VCL causes last error to be set, even nothing has already happend :-/
SetLastError(0);
retValue := GetProcessList(ProcessList);
if retValue = 0
then
begin
for i := 0
to length(ProcessList) - 1
do
begin
PID := ProcessList[i];
if GetProcessName(ProcessList[i], ProcessName) <> 0
then
ProcessName := rsUnknown;
// <- hier
Listbox1.Items.Add(IntToStr(PID) + '
- ' + ProcessName);
end;
end
else
ShowMessage(SysErrorMessage(retValue));
end;
Hier ist von einem sogenannten "resourcestring" die Rede, klingt extrem kompliziert und da fragt man sich was das eigendlich den macht. Allerdings wenn man dann über den Code drüber ließt findet man nur eine Anwendung von diesem Intressanten Construkt. Und genau an dieser Stelle wird es benutzt wie eine Constante. Warum also nicht einfach "const" nehmen?
Ich hab dann mal weiter gesucht und hab dann intressante Sachen gefunden wo das verwendet wird,
DLLs,
nonVCL Anwendungen usw. aber nirgends wird erklärt: Wozu verwendet man das? Kann man auch einfach Konstanten benutzen? Oder wird das zur Prozessinterkomunikation gebraucht?
Vielen Dank fürs Helfen,
Tobi