Seite 1 von 1

Hexotiqz

Verfasst: 23.04.2005 14:30
von Kekskiller
Ich war gestern mal fleißig ;)
Herausgekommen ist ein simpler, aber recht flinker Hex-Viewer. Ich habe ihn (weil mir nichts anderes einfiel) Hexotiqz getauft. Lässt sich einfach bedienen, ein kleiner Blick lohnt sich. Ist zudem ein kleiner Schritt, ein etwas professionelleres Programmdesign bei mir durchzusetzen.

Showcase-Eintrag:
http://www.purearea.net/pb/showcase/sho ... =0&sort=1#

Screenshot:
Bild

Buttonbedeutung:
  • Add - fügt eine neue Datei in die Liste ein
    Clear - löscht alle geöffneten Dateien
    Delete - öffnet ein Popupmenu mit allen geöffneten Dateien, per Klick kann die Datei aus der Liste entfernt werden
    End - beendet Hexotiqz
    Save - speichert die Liste mit Hexdaten als Textdatei ab
    Info - gibt Information aus

Verfasst: 23.04.2005 20:21
von MVXA
Ich werde es mir anschauen, wenn es freigeschaltet wurde. Sieht aber schon vielversprechend aus :allright:.

Verfasst: 23.04.2005 21:31
von Kekskiller
So, Showcase ist jetzt frei.

Verfasst: 23.04.2005 23:16
von MVXA
Was du noch einbauen könntest wäre, dass 0 Byte oder einfach Bytes, die nicht dargestellt werden in der rechten Spalte durch ein punkt oder ein anderes Zeichen ersetzt.

Verfasst: 24.04.2005 08:20
von Kekskiller
Oh, ja, das hatte ich ganz vergessen zu sagen:
Leerzeichen werden durch Punkte dargestellt und alle unsichtbaren Zeichen mit einem Rechteck.

Beantwortet das deine Nachfrage?

Verfasst: 24.04.2005 10:36
von freedimension
Kekskiller hat geschrieben:Oh, ja, das hatte ich ganz vergessen zu sagen:
Leerzeichen werden durch Punkte dargestellt und alle unsichtbaren Zeichen mit einem Rechteck.
Bis auf das Nullbyte! Zumindest wenn man deinem Screenshot trauen darf ;)

Verfasst: 25.04.2005 18:32
von Kekskiller
--° oh... Nunja, die vorherige Editorversion hatte das Problem glaube ich nicht... Aber mehr als das:

Code: Alles auswählen

cl = Len(chars$) - 1
For z = 0 To cl
  pos = @chars$ + z
  If PeekB(pos) = 32
    PokeB(pos, '•')
  ElseIf PeekB(pos) < 32
    PokeB(pos, '')')
  EndIf
Next
kann ich da nicht wirklich machen. Kann es sein, dass das Nullbyte sich ohnehin ganz gerne rausschummelt? Also der Screen hats bestätigt, da muss was faul sein... Hach, die Abgründe der Dateinverabeitung sind doch schon seltsam. Tja... Irgendwie passiert mir sowas immer. Ich kann nie was ordentliches vollenden, weil so ein Kram dazwischen kommt :| . Ich werd mal gucken, was daran noch so falsch sein könnte. Ich kann aber nichts versichern, mir ist das im Moment ein Rätsel!