Kommt dies aber durch ein Ereignis (bei mir durch ein
COM-Schnittstellenevent), passiert mit obigen garnichts.
Das muss ja einen Grund haben.
Vielleicht ist ja
lOBJ.Items[iY] in Wirklichkeit das TEdit das gerade schon den Fokus hat.
Lass dir auf jeden Fall den Namen der Komponente ausgeben damit du 1000% sicher bist, dass du die richtige Komponente ansteuerst:
Delphi-Quellcode:
// Test
ShowMessageFmt('Name=%s:%s', [lOBJ.Items[iY].Name, lOBJ.Items[iY].Classname]);
Vielleicht liegt es aber auch daran, dass der Aufruf nicht aus dem Hauptthread stattfindet.
Um herauszufinden, in welchem Thread du bist einfach die Funktion
GetCurrentThreadId aufrufen und die Id anzeigen.
Da die
VCL nicht threadsicher ist muss SetFocus aber aus dem Hauptthread aufgerufen werden.
Du könntest dazu eine benutzerdefinierte Message an das Formular schicken, dass dann im Kontext des Hauptthreads die SetFocus-Methode aufruft.
Delphi-Quellcode:
const
WM_MYSETFOCUS = WM_USER + 1;
...
PostMessage(form1.handle, WM_MYSETFOCUS, Integer(lOBJ.Items[iY]), 0);