KGF.dll 64 bits

Ce fil de discussion est réservé aux nouveautés et aux demandes concernant KGF.dll en version 64 bits.
Cette dll est télé-chargeable à partir de MyDrive, username: panoramic@klausgunther password: panoramic123, dossier DLLs\test KGF 64 bits\

J'ai ajouté une nouvelle série de fonctions:
fonctions déjà existantes:
- KGFdllVersion
- SearchListBox
- KGFDelimitedTextExtract
- KGFDelimitedTextReplace
- KGFDelimitedTextInsert
- KGFDelimitedTextRemove
- GetScrollBarInfo
- GetWindowByTitle
- CopyToClipboard
- CopyObject

fonctions ajoutées:
- GetActiveControl
- SendSingleChar
- SendChildSingleChar
- SendStringAsChars
- SendStringChildAsChars
- SendStringChild
- SendString
- SendStringAsText

Je suis en passe de rajouter une nouvelle série de fonctions. Ce sera publié bientôt. Mais l'information principale est celle-ci:

J'au trouvé un moyen d'appeler des fonctions d'une DLL 32 bits à partir d'un programme 64 bits, via une DLL 64 bits communiquant avec un serveur 32 bits invisible qui de son côté gère la DLL 32 bits !

Je vais utiliser cela pour accéder provisoirement à des fonctions dont le portage pose momentanément des problèmes, comme speak. Ainsi, elles seront quand-même disponibles en 64 bits, et lorsque j'aurai la vraie version 64 bits, la substitution se fera par simple réinstallation de la DLL 64 bits, de façon absolument transparente. C'est un gros pas en avant, et je vais bientôt publier cette technologie pour que d'autres créateurs de DLLs puissent éventuellement mettre leurs DLLs 32 bits en service en mode 64 bits, avec un investissement moindre.
[b]

@KLAUS

Willst du nicht noch etwas warten, bis Jack die 64BIT erläutert. Nach meinen Info ist
die Serverlösung nicht das Optimale. Wenn Jack seine Probleme gelöst hat, sehen wir
klarer.

Ohne ein echtes Panoramic 64 Bit, ist es so wieso nicht zu testen.

Grüße aus Braunschweig

@tous les auteurs de DLLs en Delphi 6:

J'ai établi une petite doc décrivant comment je fais pour produire des DLLs 64 bits sur mon petit XP 32 bits. Je suis parti de l'idée que je ne voulais pas jeter mon code pour tout reprogrammer dans un autre langage, fût-ce FreeBasic. J'ai donc trouvé une solution TRES proche de Delphi et qui permet de générer pour 32 bits, 64 bits, mais aussi pour divers Unix, Android et j'en passe, tout ça à partir du même code source ! En en cross-compilation, s'il vous plait ! Vous pouvez très bien générer un exécutable Android sur un XP ou un W7 ! Qui n'a pas rêvé de pouvoir rapidement faire de petites applis pour Android, sans ce coltiner le DTK très lourd pour Android ?

J'ai mis sur MyDrive, dans le dossier DLLs\test KGF 64 bits\ un fichier RTF qui décrit l'outil et la démarche en détail. Bonne lecture...

Pour les amateurs, j'ai mis en ligne une version de démonstration de KGF.dll 64 bits avec 3 fonctions:
KGFdllVersion
Help
speak
J'ai mis en ligne le projet Lazarus complet, en mode 64 bits. la dll s'appelle KGF64.dll.

L'intérêt, c'est que par compilation conditionnelle, elle est adaptable à traiter du conde 64 bits interne (dans ce cas, il y a encore un problème avec speak, mais le reste fonctionne), ou alors d'utiliser un serveur 32 bits qui accède la même DLL en mode 32 bits (KGF32.dll) et communique avec KGF64.dll par un système de messages. Pour l'utilisateur à partir de Panoramic (ou Lazarus ou autre), c'est transparent. Le serveur est lancé automatiquement s'il est requis.

Le serveur 32 bits est mis en ligne aussi, sous forme exécutable et sous forme de projet Lazarus complet.

Les localisations sur MyDrive sont:
DLLs\test KGF 64 bits\Demo DLL 64 bits avec serveur 32 bits\
DLLs\test KGF 64 bits\Demo serveur 32 bits\

Les noms des dossiers sont parfaitement clairs. La DLL 64 bits a été copiée dans le dossier du serveur; et le serveur a été copié dans le dossier de la DLL 64 bits.

Ceci permet de voir clairement comment on crée un tel lien (qui peut d'ailleurs servir à deux programmes normaux pour communiquer...) et exécuter une fonction dans une DLL 32 bits à partir d'une DLL 64 bits. Mais attention: les handle et adresses mémoire de l'espace 64 bits ne sont PAS utilisables en espace 32 bits !

EDIT 4/1/2013 16:36

Le problème avec speak est résolu, et la solution, qui doit faire partie des techniques de conversion, est documentée dans le fichier RTF déposé sur MyDrive.

Tu travailles bien Klaus. Mais c'est pas maintenant que je testerais. A moins que tu es un programme tout fait en AutoIt et que tu aimerais avoir le résultat.
Mais plus tard, quant le moment sera le bon, je regarderai ce que tu fais. J'en ai pour un très long moment sur mes propres codes, sans avoir le temps nécessaire pour me consacrer à fond. Tant que ce n'est pas effacé, il n'y a rien de perdu.

Salut Klaus.

Et dire que je connais bien Free Pascal pour avoir programmé dans ce langage !
Free Pascal, Dev_Pascal, Lazarus et une bonne documentation sommeillent profondément sur mon disque dur.
C’est peut-être la faute à Panoramic pour les avoir oubliés !

Sur MyDrive, dans DLLs\test KGF 64 bits\, j'ai placé une nouvelle version de KGF64.dll avec les fonctions suivantes:
KGFdllVersion, SearchListBox, SelectListBoxItem, SelectComboBoxItem, KGFFilterString,
KGFDelimitedTextExtract, KGFDelimitedTextReplace, KGFDelimitedTextInsert, KGFDelimitedTextRemove,
GetScrollBarInfo, GetWindowByTitle, CopyToClipboard, CopyObject,
GetActiveControl,
SendSingleChar, SendChildSingleChar, SendStringAsChars, SendStringChildAsChars,
SendStringChild, SendString, SendStringAsText,
GetShellLink, ExecuteLNK, ExtractIconFromLNK,
SetHotKeyHook, ClearHotKeyHook, HotKeyOn, HotKeyOff,
SetWindowHook, ClearWindowHook, SetCloseHook, ClearCloseHook,
ReadRegistryKey, Help, SetSpeaker, SpeakMode, Speak, SpeakVoices,
bin_ROL, bin_ROR, bin_SHL, bin_SHR,
bin_WROL, bin_WROR, bin_WSHL, bin_WSHR,
bin_BROL, bin_BROR, bin_BSHL, bin_BSHR,
ClipboardCopy,

Le fichier "Conversion de DLLs Delphi 7 en 64 bits.rtf" a également été mis à jour avec une information concernant un problème de caractères accentués. EN effet, Lazarus est partiellement en Unicode (UTF8), et FreePascal est entièrement en Ansi, ce qui peut poser des problèmes. Une solution partielle est documentée.