Ordnung muss sein (LaunchBar)

[EWeiss]

Projekt entfernt..

[Whookie]

Das stimmt, wenn ich die beiden Dateien ins Originalverzeichnis kopiere und starte kommt der schwarze Balken nicht mehr, nur mehr das "OverTheTaskBar funktioniert nicht mehr..." - Fenster und wenn ich das wegklicke gibts einen Anwendungsfehler

[EWeiss]

Zitat von Whookie:

Das stimmt, wenn ich die beiden Dateien ins Originalverzeichnis kopiere und starte kommt der schwarze Balken nicht mehr, nur mehr das "OverTheTaskBar funktioniert nicht mehr..." - Fenster und wenn ich das wegklicke gibts einen Anwendungsfehler

OK vergessen wir das.
Es macht keinen Sinn für ein System zu Arbeiten das man selbst nicht verwendet.
Damit ist es so fertig wie es ist.

Danke!
Lösche das Archiv wieder.

gruss

[EWeiss]

Neue und hoffentlich letzte Version hochgeladen. (Nach insgesamt 98 Downloads, könnte besser sein LOL)

• - Schrift in der Seiten Bar verbessert.
• - Seiten Bar wird nur noch einmalig beim Aufruf des Menüs gezeichnet.

Das ist die Final Version.
Wenn jetzt noch Probleme auftauchen unter W10 mit dem Menu dann müsst ihr es leider selbst beheben.
Tut mir schrecklich leid
Ohne W10 ist das zu viel stress.

gruss

[jaenicke]

Mit der .ini geht es viel einfacher. Wie hat SneakyBagels ja auch schon geschrieben, einfach auf Vorhandensein der lokalen .ini prüfen und diese anlegen oder löschen beim Umschalten:

Delphi-Quellcode:

procedure InitPath(const ACheckPortable: Boolean);
var
  sIniFile: string;
  ExeName: String;
  FilePath: String;
begin
  ExeName := ExtractFileName(ChangeFileExt(ParamStr(0), ''));
  FilePath := ExtractFilePath(ParamStr(0));
  sIniFile := FilePath + ExeName + '.ini';
  if ACheckPortable then
    Prop.Portable := FileExists(sIniFile);
  if Prop.Portable then
    OTTBIni := TIniFile.Create(sIniFile)
  else
  begin
    DeleteFile(sIniFile); // falls auf nicht portable geschaltet wurde
    UserAppDataDir := GetSpecialFolder(CSIDL_APPDATA);
    // Direktory erstellen wenn nicht vorhanden
    if not ForceDirectories(UserAppDataDir + '\BrewIdeas\OTTB') then
      raise Exception.Create('Cannot create' + UserAppDataDir + '\BrewIdeas\OTTB');

    OTTBIni := TIniFile.Create(UserAppDataDir + '\BrewIdeas\OTTB' + '\OTTB.ini')
  end;
end;

procedure LoadINI;
begin
  InitPath(True);

  Prop.SoundActive := OTTBIni.ReadBool('OTTB Option', 'SoundActive', true);
  Prop.ShortCutVisible := OTTBIni.ReadBool('OTTB Option', 'ShortCutVisible', false);
  CreateIcon.ShowDesktopIcons(Prop.ShortCutVisible);
  OTTBIni.Free;
end;

function SaveINI: Boolean;
var
  OldErrorMode: Integer;
begin
  InitPath(False);

  OldErrorMode := SetErrorMode(SEM_FAILCRITICALERRORS);
  try
    OTTBIni.WriteBool('OTTB Option', 'SoundActive', Prop.SoundActive);
    OTTBIni.WriteBool('OTTB Option', 'ShortCutVisible', Prop.ShortCutVisible);
  finally
    Result := True;
    SetErrorMode(OldErrorMode);
    OTTBIni.Free;
  end;
end;

Das Halt habe ich einmal herausgenommen, denn wenn du eine Exception wirfst, wird das ja ohnehin nicht mehr ausgeführt.

[EWeiss]

@jaenicke Danke werde es mal einbauen und testen.

Interesse mal das neue Menu zu testen ?
Dann lade ich die 2 Dateien nochmal hoch.

EDIT:
Funktioniert Super!
Habe da keine vernünftige lösung erarbeiten können. (Mir viel einfach nichts ein)

gruss

[jaenicke]

Jetzt könnte ich gerade, ja.

[EWeiss]

Zitat von jaenicke:

Jetzt könnte ich gerade, ja.

OK.. Es wird aber das neue Archiv vorrausgesetzt.
Und die Anwendung kann dann nur über den taskmanager entfernt werden wenn es nicht kracht
Das Menu (Popup Window) kannst du wegschalten wenn du auf dem Desktop klickst.

gruss

[jaenicke]

Die Positionierung des vertikalen Teils sieht so deutlich besser aus, der ist nun genau mittig. Am Rest hat sich abgesehen von der Breite insgesamt um ein paar Pixel nix geändert und nach dem Öffnen des Menüs friert die Anwendung ein, sprich auch Hovern im Menü passiert nicht.

[EWeiss]

Zitat von jaenicke:

Die Positionierung des vertikalen Teils sieht so deutlich besser aus, der ist nun genau mittig. Am Rest hat sich abgesehen von der Breite insgesamt um ein paar Pixel nix geändert und nach dem Öffnen des Menüs friert die Anwendung ein, sprich auch Hovern im Menü passiert nicht.

Hmm..
Wie ist es denn mit dem Text?
Ist dieser zentriert oder immer noch versetzt wie beim normalen Menu.

Bei mir sieht es so aus.
Einfrieren tut da nix wenn das Window geöffnet wird setze ich die Bar auf enabled False damit keine Eingaben mehr getätigt werden können wie beim normalen PopUpMenu.

Klicks du auf den Desktop mit der linken Maus sollte das WIndow schließen und die Bar wieder bedienbar sein.

Zitat:

sprich auch Hovern im Menü passiert nicht.

Das ist ja alles noch im Anfangsstadium

gruss

[jaenicke]

Zitat von EWeiss:

Ist dieser zentriert oder immer noch versetzt wie beim normalen Menu.

Da habe ich mich eben geirrt, der sieht jetzt richtig aus. Links alt direkt nach Aufruf, rechts neu: