GELÖST --- AHK mit 704 IO mit 750b3 NIO

German support forum

Moderators: Hacker, Stefan2, white

Post Reply
Inputsammler
Junior Member
Junior Member
Posts: 26
Joined: 2003-12-09, 20:06 UTC

GELÖST --- AHK mit 704 IO mit 750b3 NIO

Post by *Inputsammler »

Hey All

Ich habe folgenden Code um Dateien von einer Speicherkarte auf dem PC zu kopiern. Das was mit der Version7.04 gut klappt. Leider mit der 7.50b3 nicht mehr .

Und zwar schiebe ich das Verzeichnis per DragandDrop auf das Script in den Buttonbar und starte das Script. Die Übergabe des Verzeichnisses Verzeichnisses funkltioniert nicht mehr

Hier der CODEAUSSCHNITT vom erkennen des Pfades

Code: Select all

ControlGetText tc_sPath, TMyPanel2  ;Im Root wird zum Schluss ein Backslash angezeigt , ansonste nicht

      StringRight  tc_sRigth, tc_sPath, 2 ;Entfernen des letzen Backslash wenn vorhanden
      if tc_sRigth =\>
      {
         StringMid tc_sPath, tc_sPath, 1, StrLen(tc_sPath) - 2
        tc_CutStr = 2
      } ELSE {
        tc_CutStr = 1
         StringMid tc_sPath, tc_sPath, 1, StrLen(tc_sPath) - 1
      }
Habe ich was falsch gemacht
Last edited by Inputsammler on 2009-05-24, 19:43 UTC, edited 1 time in total.
#99290 Personal license
User avatar
sqa_wizard
Power Member
Power Member
Posts: 3895
Joined: 2003-02-06, 11:41 UTC
Location: Germany

Post by *sqa_wizard »

Der Name des Controls hat sich geändert.
TMyPanel2 von TC7.04 ist im TC7.50 nun TMyPanel3 :!:

Um beide Versionen zu berücksichtigen verwende ich:

Code: Select all

ControlGetText tc_sPath, TMyPanel3
   IF (tc_sPath = "")
      ControlGetText tc_sPath, TMyPanel2
#5767 Personal license
Inputsammler
Junior Member
Junior Member
Posts: 26
Joined: 2003-12-09, 20:06 UTC

DANKE

Post by *Inputsammler »

Danke es FUNKTIONIERT.

Merci
Gruß Gerd
#99290 Personal license
TWatcher
Junior Member
Junior Member
Posts: 43
Joined: 2008-08-26, 18:46 UTC

Post by *TWatcher »

@sqa_wizard: Wird TMyPanel2 von TC7.50 nicht mehr benutzt? Falls doch könnte es Probleme geben.
Ich hatte eher gedacht, aus der TC Titelzeile die Version herauszuholen und falls Version >= 7.50 dann die neuen Controls zu benutzen (hier: TMyPanel3), ansonsten die alten (hier: TMyPanel2).
Wenn man aber davon ausgehen kann, dass TMyPanel2 nicht mehr benutzt wird, funktionierts so wie von dir beschrieben, wäre einfacher.
User avatar
sqa_wizard
Power Member
Power Member
Posts: 3895
Joined: 2003-02-06, 11:41 UTC
Location: Germany

Post by *sqa_wizard »

Wird TMyPanel2 von TC7.50 nicht mehr benutzt?
Doch, aber ich weiß nicht wofür :(
Es befindet sich oberhalb von TMyPanel3 (die horizontale Trennlinie ?)
Jedenfalls hat TMyPanel2 in TC 7.50 definitiv keinen Text gesetzt !

TMyPanel3 in TC7.04 ist der linke TAB und hat dort auch keinen Text gesetzt !

Zugegeben, mir wäre es auch lieber die Reihenfolge in TC 7.50 würde mit TC 7.04 kompatibel (=TMyPanel2) bleiben ...
#5767 Personal license
User avatar
ghisler(Author)
Site Admin
Site Admin
Posts: 50754
Joined: 2003-02-04, 09:46 UTC
Location: Switzerland
Contact:

Post by *ghisler(Author) »

Das zusätzliche Panel wird für den Breadcrumbbar benutzt - es zeigt einen Button mit einem Pfeil an, wenn man mit der Maus über den Verzeichnispfad fährt. All diese Controls sind vom Typ TMyControl (Delphi-Klasse). Eine bewusse Numerierung habe ich nicht vorgenommen, das macht AutoHotkey.
Author of Total Commander
https://www.ghisler.com
Post Reply