PureBoard

Hi Programie,

die sechs Sekunden Unterschied waren bei 100000 Durchgängen :wink: .

Habe mir mal den Code mit der Win-API angeschaut und die Speichern-Prozedur damit zusammen gebaut.
Es scheint als ob du ein Programm schreiben wolltest, dass in Echtzeit die Sachen, die auf dem Bildschirm passieren ...

Hi Programie,

die beiden Prozeduren CopyImageToMem() und CopyMemToImage() scheinen genau dein Anliegen zu erfüllen. Die dritte Prozedur Filtern() dient lediglich dazu einen Weichzeichnen-Effekt zu realisieren, wonach der Thread-Ersteller gefragt hatte.

Ich habe mal einen Code zusammengebastelt ...

Hi Programmie,

vielleicht hilft dir der Code von Freedimension in diesem Thread weiter:
http://www.purebasic.fr/german/viewtopic.php?t=1164

DrawingBuffer() geht nur bei SpriteOutput() und ScreenOutput (steht auch in der Hilfe) .

Grüße
Bax

Hey,

sehe gerade, dass der Contest zu Ende ist.

Herzlichen Glückwunsch an den Gewinner und vielen Dank für die Mühe an die Ausrichter!

Schade, dass Tronds Code zu spät gekommen ist. Der hätte imo gute Chancen gehabt.

Hi PMTheQuick,

danke für die quicke Antwort!
Was das Plotten angeht ist mir nun alles klar.

Zu den Schriften:
Ist das Einsetzen von Schriften zur Bildgestaltung
(um dem Bild einen Sinn zu geben) nicht erlaubt?
(also auch mit einen umfangreicheren Text als "created with PureBasic"
eher etwas wie ...

Bei zwei Dingen ist mir die Regelung noch nicht ganz klar.

Etwas verwirrt (:freak:) haben mich:

Ja, solange es in angenehmen Mengen ist ok. Ich will nur kein Massen-Plotting! ;) Achja, Schriften tolerie ich, solange sie dezent eingesetzt werden z.B. für kleine Texte wie PureBasic oder so. Aber ...

@Dark Skillu
In deinem Code musst du
open$=ReadString(0)
durch
Repeat
AddGadgetItem(3, -1, ReadString(0)) ; eine Zeile zum Editorgadget hinzufügen (-1: unten anfügen)
Until Loc(0) = Lof(0)
ersetzen und
SetGadgetText(3, open$)
auskommentieren.

Guck dir auch mal (wie D@nte schon angemerkt hat ...

Mit Loc(#File) kriegst du die aktuelle Cursorposition in der Datei, mit Lof(#File) die gesamte Länge der Datei.

Wenn der Lese-/Schreibcursor noch nicht am Ende der Datei angekommen ist (Loc(#File) = Lof(#File)), gibt es noch was auszulesen.

In deinem Beispiel könntest du es so machen:
Repeat ...

Hi Delle,

Position abfragen:
position.RECT
GetWindowRect_(hWnd, position)

Position setzen:
MoveWindow_(hWnd, x, y, #IGNORE, #IGNORE, #True)

Um das Fenster immer zurückzusetzen gibt es mehrere Möglichkeiten. Hier wird die Position (von "Unbenannt - Paint") nur verändert, wenn die Maustaste ...

Hi C9ma,

Irgendwie bin ich bei meinem aktuellen Projekt nicht richtig vorwärts gekommen und hatte auch irgendwie nichts zu tun heute Abend.
Da hab ich eben angefangen dein Poker-Prog zu schreiben. Dachte zuerst, dass das nur eine halbe Stunde dauern würde, wurde zwar jetzt ein bisschen mehr, aber ...