Mit folgenden Änderungen ist die
Unit bei Delphi 6 & 7 compilierbar:
Zeile 30: //{$define CamSpy} //my own logging
Zeile 1719: addlog('
Exception in DispatchMessageUniCode(MsgNum='+inttostr(lpMsg.mes sage)+') '+e.ClassName+' '+e.Message{,cst_Exception});//letzter Parameter zuviel?
Zeile 1746: Result := windows.GetCharacterPlacementW(
DC,@wsbuf[0],boolean(ii),boolean(p4),p5,p6);//mit Boolean-Konvertierung klappt es
Bei Delphi 7 kommen zudem
unzählige Warnungen.