Nouvelle Dll WindowsVersion

J'ai fait une nouvelle toute petite DLL: WindowsVersion.dll. EDIT correction d'orthographe

Elle contient 2 fonctions:
1. res% = dll_call0("IsWin64")
res%=0 si Win32, et res%=1 si Win64

2. res% = dll_call1("GetWindowsVersion",adr(version$))
retourne une identification textuelle dans la variable version$ qui doit être initialisée avec un string suffisamment large avant l'appel.

Voici un programme montrant l'utilisation de ces deux fonctions:

Code:

dim res%, version$

dll_on "WindowsVersion.dll"

res% = dll_call0("IsWin64")
if res%=1
  print "Win64"
else
  print "Win32"
end_if

ver$ = string$(255," ")
res% = dll_call1("GetWindowsVersion",adr(version$))
version$ = trim$(version$)
print version$
dll_off
end

Bonjour

Moi je ne réagis pas beaucoup sur ce forum de Klaus, parce que j'y connais rien à ce que vous faites, ça me parait très loin pour moi, car vous allez au profond de Panoramic, alors que moi je suis encore au milieu de l'échelle dans le puit pour y aller

Mais je vois quand même que ce que vous faîtes est très utile et intéressant, je le suis de très près, même si je ne poste pas.
Pouvoir faire comme application ce que vous avez montré avec panoramic je trouve ça génial !

Oh, ne t'inquiète pas, Exdragon ! Je propose une (vaste) palette d'outils qui peuvent correspondre ou non aux besoins des uns et des autres. On peut y piquer ce que l'on veut, selon son envie ou son besoin. Quelques fois, je réalise des outils spécifiques pour résoudre un problème ponctuel d'un Panoramicien. Mais la plupart du temps, ce sont des modules issus de mes réflexions sur mes propres applications, et dont j'estime qu'ils peuvent avoir un intérêt plus général.

Donc, si un jour, tu as besoin que quelque chose, fouine dans les modules que je propose, ou pose-moi la question via le forum que je consulte très fréquemment. C'est un peu comme ça que je vois ma contribution.

Merci Klaus

Merci Klaus
d'ailleurs j'ai déjà piqué dans tes modules, sur ton site

Tiens j'interviens Na !

Citation :

une identificéation

Orthographe corrigée. Merci.

Test OK

Hallo Klaus,

geht diese DLL auch mit XP und Vista (32/64)

Danke
Severin

Diese DLL geht für ALLE Windows-Versionen, inclusive Windows 7 in allen Varianten.

Cette DLL marche avec toutes les versions de Windows, y compris Windows 7 dans toutes ses variantes.

Danke Klaus,
das ist super.

Severin

PS. Danke das du alle Anfragen so cool beantwortest. Respekt.
Die letzten Tage hier waren etwas hektisch und angespannt.
Ich hoffe es wird wieder wie vorher. Symphatisch und Verständnisvoll.

Danke für deine Zeit.

Eventuell könntest du .......
Dann wird es besser verstanden.

Traduction du message de Severin:
Merci Klaus,
c'est super.

Severin

PS. Merci d'avoir répondu à toutes les questions de façon aussi cool. Avec respect.
Ces derniers jours étaient un peu mouvementés et tendus.
J'espère que tout redeviendra comme avant. Sympathique et compréhensif.

Merci pour le temps passé.

Eventuellement, si tu pouvais...
Ce sera mieux compris ainsi.
Danke das du alle Anfragen so cool beantwortest. Respekt.