Beiträge von Oscar

**Oscar**

Zitat von Racer

Ja, das hätte ich auch gerne gemacht, nur aber ich bis jetzt nicht herausgefunden wie man das Fenster nehmen kann.

Es gibt zwei (einfache) Möglichkeiten:

C++

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

Global $hGui = GUICreate('test', 640, 480, -1, -1, $WS_POPUP, $WS_EX_CONTROLPARENT)
GUISetState()
Do
Until GUIGetMsg() = -3
GUIDelete($hGui)

Global $hGui = GUICreate('test', 640, 480, -1, -1, $WS_POPUP)
GUICtrlCreateLabel('42', 20, 20, 120, 36, Default, $GUI_WS_EX_PARENTDRAG)
GUICtrlSetBkColor(-1, 0xAAAAFF)
GUICtrlSetFont(-1, 24)
GUICtrlCreateLabel('', 0, 0, 640, 480, Default, $GUI_WS_EX_PARENTDRAG)
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)
GUISetState()
Do
Until GUIGetMsg() = -3

Alles anzeigen

**Oscar**

Es gibt noch mal ein Update auf Version 1.4.0.0 (Download in Post#1).

**Oscar**

Zitat von UEZ

Wenn du z.B. den Test-Speicherplatz auf 1GB und "Nur Lesetest" drückst, dann wird der Test durchgeführt. Aber erhöhst du dann auf 10 GB und startest den Test nochmals, dann werden immer noch 1 GB gelesen.

Der Button "Nur Lesetest" wird nur aktiviert, wenn Testdaten vorhanden sind und es werden dann alle vorhandenen Testdaten gelesen. Der "Test-Speicherplatz" wird beim "Nur Lesetest" gar nicht berücksichtigt.

Aber Du hast recht, die Bezeichnung ist nicht so eindeutig. Das werde ich ändern.

Zitat von UEZ

Es würde auch Sinn machen, wenn der Graph auf die Test Größe vergrößert werden würde, da ansonsten nur ein paar Striche zu sehen sind.

Naja, für einen aussagekräftigen Test sollte man sowieso schon 10 GB oder mehr auswählen. Und wenn man mehr auswählt als 32 GB, dann scrollt der Ballken. Insofern ist eine skalierte Grafik ungünstig.

Wenn der Test abgeschlossen ist und man die Daten mit dem Viewer betrachtet, dann sind die Daten skaliert.

**Oscar**

Gib mal beim Aufruf nach dem "Programmpfad" als nächsten Parameter nochmal den "Programmpfad" ein, sodass das WorkingDir ebenfalls auf das Programmverzeichnis zeigt.

Viele Programme erwarten nämlich genau das.

**Oscar**

So der Fehler ist beseitigt. Neue Version in Post#1.

**Oscar**

Zitat von UEZ

hast du den Link?

Ja, hier: https://docs.microsoft.com/en-us/windows/…rectedfrom=MSDN

**Oscar**

Zitat von UEZ

ist 17.

Das Medium ist eine SSD Platte und an NVM Express angeschlossen.

Aha!

Das habe ich geahnt. Die Liste wurde inzwischen erweitert. Es gibt mehr als die 14 Einträge, die AutoIt da noch berücksichtigt.

Ich habe gerade mal auf MSDN nachgesehen. Es sind mittlerweile 22 Einträge.

Vielen Dank, ich werde das im Programm ändern.

**Oscar**

Zitat von Musashi

Wenn ich das Beispiel aus der Hilfe zu _WinAPI_GetDriveBusType ausführe, dann erhalte ich :

Ja, das ist bei mir auch so.

Interessant wäre die Ausgabe von alpines und UEZ, weil es dort scheinbar nicht klappt.

Falls da nicht "-1" rauskommt, könnt ihr bitte noch dazuschreiben, wie die Platte bei euch angeschlossen ist?

**Oscar**

Zitat von hanady

I need again to consult you to show the real USB size as all Autoit codes show only
USB drive size shown by Windows but you know it's not correct as ever USB Drive
Has fixed Size when we buy it Like : (e.g 2 GB, 4 GB, 8 GB, 16 GB, 32 GB, 64 GB etc)
for me to show the real fixed total size of the USB Drive is to use rufus inside the Autoit code
but if there is a code to show USB Size like rufus it will be better Or please help me with a code
to add to Your great Project again here :

Alles anzeigen

I do not think so, because the display of Windows is correct.

The calculation is based on the binary system (2^10 = 1024 Byte = 1kB). The hard disk manufacturers use the decimal system (10^3 = 1000 bytes = 1kB) to suggest a larger capacity. But a computer works on the basis of the binary system.

**Oscar**

Zitat von UEZ

bekomme eine Fehlermeldung, wenn ich das C-Laufwerk selektiere:

Zitat von alpines

Habe übrigens den selben Fehler wie UEZ.

Merkwürdig!

Könnt ihr mal testen, was hierbei als Rückgabe rauskommt:

C++

#include <WinAPIFiles.au3>

ConsoleWrite(_WinAPI_GetDriveBusType('c:') & @CR)

**Oscar**

Naja, ich hatte das Ganze sowieso bereits per PM mit hanady geklärt.

Es mündete in eine neue Version von FlashTest und er ist zufrieden.

**Oscar**

Es gibt eine neue Version (siehe Post#1).

Die einzige Änderung besteht darin, dass jetzt zusätzlich noch die Modellbezeichnung des Laufwerks ausgelesen wird.

**Oscar**

Neue Version! Das mit der Schriftfarbe hatte ich ganz vergessen.

**Oscar**

Ich habe hier eine Funktion geschrieben, mit der man einen String auf eine GDI+ Graphic zeichnen lassen kann.

Das Besondere daran ist, dass man den String um 90, 180 oder 270 Grad gedreht zeichnen lassen kann. Außerdem kann man Fontname, Schriftgröße, Schriftstil und die Ausrichtung (links, zentriert, rechts) angeben.

Auch mehrzeilige Strings sind möglich.

Im Beispiel habe ich außerdem einen Backbuffer mit eingebaut, um zu zeigen, wie man mit GDI+ auf andere Fenster (überlagernd) reagieren muss.

Edit: Neue Version! Man kann jetzt auch die Schriftfarbe angeben.

Screenshot:

Screenshot.png

**Oscar**

Füge mal noch das hier ein:

C++

    _GDIPlus_GraphicsSetInterpolationMode($hGraphic, 7)
    _GDIPlus_GraphicsSetCompositingQuality($hGraphic, 3)
    _GDIPlus_GraphicsSetPixelOffsetMode($hGraphic, 2)

**Oscar**

Dein Problem lässt sich für mich nicht rekonstruieren, da ich weder weiß, was in $sNameNeu noch was in "ausnahmen.txt" drin steht.

Deshalb mal eine Vermutung (Befragung der Kristallkugel):

Du verwendest beim einlesen von "ausnahmen.txt" keinen absoluten Pfad, sondern relativ zum WorkingDir. Wenn nun irgendwo im Script das WorkingDir geändert wird, so findet FileOpen die Datei nicht und Stringsplit liefert ein leeres Array zurück, was dazu führt, dass _ArraySearch keine Ausnahme findet und folglich die Buchstaben ersetzt werden.

Und manchmal geht es, weil das WorkingDir noch mit dem ScriptDir übereinstimmt (bis irgendein Befehl das WorkingDir ändert).

**Oscar**

Zitat von Musashi

Nur zur Info : Der Link läuft (bei mir) auf den Fehler 404 not found.

Oh, stimmt! Neue Forensoftware, da haben sich die Links geändert.

Ich hab's im Startpost geändert.

Danke, für den Hinweis!

**Oscar**

Zitat von Schmunke

Oscar ... und das sieht gar nicht mal so schlecht aus !!

Damit probier ich es mal aus ...Danke !!

Das Array "$aPoints" musst Du natürlich mit Deinen Daten füllen. Eventuell noch an die Pixelwerte anpassen.

Oder Du musst mal Beispieldaten zur Verfügung stellen, dann könnte ich Dir das auch anpassen.

**Oscar**

Zitat von Schmunke

... oder geht das ganz anders ? Ich brauch irgendwie mal nen Ansatz, wie das realisiert werden kann.

Ja, das geht mit einem Pic-Control und etwas GDI+.

Hier mal ein Beispiel:

AutoIt

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <GDIPlus.au3>
#include <WinAPISysWin.au3>

_GDIPlus_Startup()

#Region ### START Koda GUI section ### Form=c:\program files (x86)\autoit3\scite\koda\forms\lp nebenfenster.kxf
$Form2 = GUICreate("Form2", 1053, 883, 603, 129)
GUISetFont(10, 400, 0, "MS Sans Serif")
$Group1 = GUICtrlCreateGroup(" Liftpuffer - Typ LP ", 8, 8, 1033, 865)
$Group2 = GUICtrlCreateGroup(" aktuellen Pufferdaten ", 16, 32, 289, 457)
$Label3 = GUICtrlCreateLabel("aufprallende Masse M [kg]", 24, 104, 163, 20)
$Label4 = GUICtrlCreateLabel("Vortriebskraft [N]", 24, 128, 104, 20)
$Label5 = GUICtrlCreateLabel("Nenngeschwindigkeit [m/s]", 24, 152, 165, 20)
$Label6 = GUICtrlCreateLabel("Aufprallgeschwindigkeit [m/s]", 24, 176, 178, 20)
$Label7 = GUICtrlCreateLabel("Gasdruck [bar]", 24, 200, 93, 20)
$Label8 = GUICtrlCreateLabel("Gasvolumen [l]", 24, 224, 94, 20)
$Label9 = GUICtrlCreateLabel("Drosselbohrungen", 24, 248, 115, 20)
$Label10 = GUICtrlCreateLabel("Restbohrung", 24, 272, 81, 20)
$Label11 = GUICtrlCreateLabel("Drosselkurvenexponent", 24, 296, 146, 20)
$Label12 = GUICtrlCreateLabel("norm. Wegendpunkt", 24, 320, 124, 20)
$Label13 = GUICtrlCreateLabel("unterer Funktionswert", 24, 344, 129, 20)
$Label14 = GUICtrlCreateLabel("oberer Funktionswert", 24, 368, 128, 20)
$Label15 = GUICtrlCreateLabel("Länge Anstiegsflanke [mm]", 24, 392, 166, 20)
$Label16 = GUICtrlCreateLabel("Anz. Bohrungen in Anstiegsflanke", 24, 416, 201, 20)
$Label17 = GUICtrlCreateLabel("Länge Zwischenflanke", 24, 440, 137, 20)
$Label18 = GUICtrlCreateLabel("Anz. Bohrungen in Zwischenflanke", 24, 464, 205, 20)
$Label2 = GUICtrlCreateLabel("Länge Hydraulikrohr [mm]", 24, 80, 158, 20)
$Label1 = GUICtrlCreateLabel("LP 50 / 950  -  Fabr.-Nr.:", 24, 56, 139, 20)
$Label19 = GUICtrlCreateLabel("Label19", 168, 56, 116, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label20 = GUICtrlCreateLabel("Label20", 232, 80, 52, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label21 = GUICtrlCreateLabel("Label21", 232, 104, 52, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label22 = GUICtrlCreateLabel("Label22", 232, 128, 52, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label23 = GUICtrlCreateLabel("Label23", 232, 152, 52, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label24 = GUICtrlCreateLabel("Label24", 232, 176, 52, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label25 = GUICtrlCreateLabel("Label25", 232, 200, 52, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label26 = GUICtrlCreateLabel("Label26", 232, 224, 52, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label27 = GUICtrlCreateLabel("Label27", 200, 248, 84, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label28 = GUICtrlCreateLabel("Label28", 200, 272, 84, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label29 = GUICtrlCreateLabel("Label29", 232, 296, 52, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label30 = GUICtrlCreateLabel("Label30", 232, 320, 52, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label31 = GUICtrlCreateLabel("Label31", 232, 344, 52, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label32 = GUICtrlCreateLabel("Label32", 232, 368, 52, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label33 = GUICtrlCreateLabel("Label33", 232, 392, 52, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label34 = GUICtrlCreateLabel("Label34", 232, 416, 52, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label35 = GUICtrlCreateLabel("Label35", 232, 440, 52, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label36 = GUICtrlCreateLabel("Label36", 232, 464, 52, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group3 = GUICtrlCreateGroup(" geänderte Pufferdaten ", 312, 32, 161, 457)
$Input1 = GUICtrlCreateInput("Input1", 320, 102, 52, 24)
$Label37 = GUICtrlCreateLabel("Label37", 320, 128, 52, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label38 = GUICtrlCreateLabel("Label38", 320, 344, 52, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Label39 = GUICtrlCreateLabel("Label39", 320, 176, 52, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Input2 = GUICtrlCreateInput("Input2", 320, 198, 52, 24)
$Label40 = GUICtrlCreateLabel("Label40", 320, 224, 52, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Input3 = GUICtrlCreateInput("Input3", 320, 246, 52, 24)
$Input4 = GUICtrlCreateInput("Input4", 394, 246, 52, 24)
$o = GUICtrlCreateLabel("o", 378, 248, 11, 19)
GUICtrlSetFont(-1, 10, 400, 0, "Calibri")
$Input5 = GUICtrlCreateInput("Input5", 320, 270, 52, 24)
$Input6 = GUICtrlCreateInput("Input6", 394, 270, 52, 24)
$Label41 = GUICtrlCreateLabel("o", 378, 272, 11, 19)
GUICtrlSetFont(-1, 10, 400, 0, "Calibri")
$Input7 = GUICtrlCreateInput("Input6", 320, 150, 52, 24)
$Label42 = GUICtrlCreateLabel("Label38", 320, 368, 52, 20)
GUICtrlSetBkColor(-1, 0x00FFFF)
$Input8 = GUICtrlCreateInput("Input6", 320, 294, 52, 24)
$Input9 = GUICtrlCreateInput("Input6", 320, 318, 52, 24)
$Input10 = GUICtrlCreateInput("Input6", 320, 390, 52, 24)
$Input11 = GUICtrlCreateInput("Input6", 320, 414, 52, 24)
$Input12 = GUICtrlCreateInput("Input6", 320, 438, 52, 24)
$Input13 = GUICtrlCreateInput("Input6", 320, 462, 52, 24)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Speichern = GUICtrlCreateButton("Speichern", 488, 392, 75, 25)
$Ende = GUICtrlCreateButton("Ende", 488, 456, 75, 25)
$Berechnen = GUICtrlCreateButton("Berechnen", 488, 328, 75, 25)
$Group4 = GUICtrlCreateGroup("Group4", 16, 496, 1017, 369)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label43 = GUICtrlCreateLabel("", 488, 104, 52, 20)
GUICtrlSetBkColor(-1, 0xFF00FF)
$Label44 = GUICtrlCreateLabel("", 488, 128, 52, 20)
GUICtrlSetBkColor(-1, 0xFFFF00)
$WegKraftDiagramm = GUICtrlCreateLabel("Weg-Kraft-Diagramm", 560, 106, 122, 20)
$ZeizGeschwindigkeitDiagramm = GUICtrlCreateLabel("Zeit-Geschwindigkeits-Diagramm", 560, 130, 187, 20)
Global $idGraphic = GUICtrlCreatePic('', 30, 520, 990, 330)
GUICtrlCreateGroup("", -99, -99, 1, 1)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
_SetGraphic($idGraphic)
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            _GDIPlus_Shutdown()
            Exit

    EndSwitch
WEnd

Func _SetGraphic(Const $idCtrl)
    Local $aPoints[][2] = [[16], _
    [0, 330], [10, 260], [20, 200], [30, 220], [40, 260], [50, 160], [60, 80], [70, 120], _
    [80, 180], [90, 110], [100, 70], [110, 150], [120, 180], [130, 240], [140, 310], [150, 260] _
    ]
    Local $hWnd, $tRect, $hBitmap, $hGfx, $hPen, $hBMP, $hPrevImg
    $hWnd = GUICtrlGetHandle($idCtrl)
    $tRect = _WinAPI_GetWindowRect($hWnd)
    $hBitmap = _GDIPlus_BitmapCreateFromScan0($tRect.right - $tRect.left, $tRect.bottom - $tRect.top)
    $hGfx = _GDIPlus_ImageGetGraphicsContext($hBitmap)
;~     _GDIPlus_GraphicsClear($hGfx, 0xFF000000)
    _GDIPlus_GraphicsSetInterpolationMode($hGfx, 7)
    _GDIPlus_GraphicsSetSmoothingMode($hGfx, 2)
    $hPen = _GDIPlus_PenCreate(0xFF0000FF, 4)
    _GDIPlus_GraphicsDrawCurve($hGfx, $aPoints, $hPen)
    $hBMP = _GDIPlus_BitmapCreateDIBFromBitmap($hBitmap)
    $hPrevImg = GUICtrlSendMsg($idCtrl, $STM_SETIMAGE, $IMAGE_BITMAP, $hBMP)
    If $hPrevImg Then _WinAPI_DeleteObject($hPrevImg)
    _GDIPlus_PenDispose($hPen)
    _GDIPlus_GraphicsDispose($hGfx)
    _GDIPlus_BitmapDispose($hBitmap)
EndFunc

Alles anzeigen

**Oscar**

Deine Uservorstellung ist zwar etwas mager, aber trotzdem: Herzlich willkommen!

Beiträge von Oscar

gut lesbare Uhr für den Desktop

Flash-Test

Flash-Test

AutoIt-Skript funktioniert nicht mehr nach Win 10 Update

Flash-Test

Flash-Test

Flash-Test

Flash-Test

Flash-Test

Flash-Test

_GDIPlus_GraphicsDrawStringRotate

Flash-Test

_GDIPlus_GraphicsDrawStringRotate

_GDIPlus_GraphicsDrawStringRotate

GDI+ Zeichnung trotz high quality mode sehr pixelig

Umlaute ersetzen

Kleines Desktop-Spiel (ChipHunter)

QBasic-Prg in AutoIT umprogrammieren

QBasic-Prg in AutoIT umprogrammieren

Hallo