Screeshot TWebbrowser

[softtouch]

Mal versuchen, ob es besser aussieht when IE11 emuliert wird:

Delphi-Quellcode:

var exename:string;
  exename:=TPath.GetFileName(ParamStr(0));
  reg := TRegistry.Create(KEY_SET_VALUE);
  reg.RootKey := HKEY_CURRENT_USER;
  Win32Check(reg.OpenKey(registryPath,True) );
  reg.WriteInteger(exeName, 11000);
  reg.CloseKey;
  reg.Free;