Autor |
Beitrag |
blackbirdXXX
Beiträge: 1077
Erhaltene Danke: 1
Ubuntu Dapper
|
Verfasst: Di 13.01.04 20:45
Ich habe ein Programm gemacht welches Rasterbilder im Matrix Stil erstellt.
Einfach eine Quelldatei im bmp Format öffnen und in den Optionen die Parameter anpassen. Danach auf erstellen gehen und das Ergebnis begutachten.
Ich werde sie noch verbessern deswegen bitte Bugs posten.
Programm
Demo Bild 1
Demo Bild 2
Demo Bild 3
_________________ Klein, schwarz und ärgert Techniker? Jumper!
|
|
Tino
Beiträge: 9839
Erhaltene Danke: 45
Windows 8.1
Delphi XE4
|
Verfasst: Mi 14.01.04 10:12
Hallo!
Schönes Programm. Hat bei mir sofort funktioniert.
Wäre es nicht möglich die ganzen Einstellungen auf einer einzigen Seite anzuzeigen. Letztendlich sind es ja nicht sehr viele Einstellungen: Das Eingabefeld um das Bild zu bestimmen und die zwei, drei sonder Einstellungen. Zusätzlich noch der Erstellen-Button und fertig. Vielleicht könnte man noch die Option einbauen um das Textmuster selbst zu bestimmen. Also z. b. den Text Delphi-Forum.de
Gruß
Tino
|
|
Chatfix
Beiträge: 1583
Erhaltene Danke: 10
Win 10, Win 8, Win 7, Win Vista, Win XP
VB.net (VS 2015), MsSQL (T-SQL), HTML, CSS, PHP, MySQL
|
Verfasst: Mi 14.01.04 12:08
Geiles Programm!
Kannst Du vieleicht irgendwie die Große des MatrixPictures einstellbar machen, also das man es z.B. so einstellen kann das das ganze bild zu sehen ist ohne das man scrollen muss...
Aber ansonsten total geil!!!!
/EDIT:
Beim Bild wählen dialog, kannste ja statt dem OpenDialog einen OpenPictureDialog nehmen, so hat der User immer gleich eine vorschau des bildes...
_________________ Gehirn: ein Organ, mit dem wir denken, daß wir denken. - Ambrose Bierce
|
|
roller
Beiträge: 22
|
Verfasst: Mi 14.01.04 16:44
das prog is echt cool
gehe ich richtig in der annahme, das du für jedes pixel einen buchstaben/zahl/symbol wählst mit der pixel farbe?
wenn ja könntest du ganz einfach die auflösung justieren, indem du das bild vorhher verkleinerst....
|
|
StefanH
Beiträge: 1144
Win XP
D5 Standard, D7 Pers, D2005 Pers
|
Verfasst: Mi 14.01.04 17:01
Tino: kuckst du hier : www.delphi-source.de/projekte/lpt/ bzw. ip-web.hn.org/
aber trotzdem: C00les prog
_________________ "Als es noch keine Computer gab, war das Programmieren noch relativ einfach."(Edsger W. Dijkstra)
"Ich bin nicht von Sinnen, sondern ich rede wahre und vernünftige Worte." (Paulus)
|
|
blackbirdXXX
Beiträge: 1077
Erhaltene Danke: 1
Ubuntu Dapper
|
Verfasst: Mi 14.01.04 19:36
Habe jetzt einiges verbessert:
+ Alle Optionen auf einer Seite
+ Vorschau beim Bild laden
+ Fehler bei den Tags behoben. I funktionierte nicht bei Tagmodus BR und Br
Todo:
+ Ich werde noch machen das man beliebeige Texte erstellen und diese gleich in ein Rasterbild umwandeln kann.
+ Auch werde ich noch eine Funktion einbauen die große Bilder verkleinert.
+ Auch das mit dem Fülltext kommt noch.
Ich lese die Pixel mit canvas.getpixel aus und überprüfe noch ob ich den font Teil neu setzen muss oder ob er gelich geblieben ist.
_________________ Klein, schwarz und ärgert Techniker? Jumper!
|
|
ixtreme
Gast
Erhaltene Danke: 1
|
Verfasst: Mi 14.01.04 21:40
1. keine abbrechfunktion bei der Vorschau
2. Nix mehr Cool
Gruß
ixtreme.de
|
|
blackbirdXXX
Beiträge: 1077
Erhaltene Danke: 1
Ubuntu Dapper
|
Verfasst: Do 15.01.04 08:15
Die Abbrechfunktion würde ich gerne einbauen aber ich weiß nicht wie man eine Schleife bei Kopfdruck beendent.
_________________ Klein, schwarz und ärgert Techniker? Jumper!
|
|
Chatfix
Beiträge: 1583
Erhaltene Danke: 10
Win 10, Win 8, Win 7, Win Vista, Win XP
VB.net (VS 2015), MsSQL (T-SQL), HTML, CSS, PHP, MySQL
|
Verfasst: Do 15.01.04 09:14
Ich habe 2 Buttons. einer startet die schleife und einer beendet
Dann noch ne globale variable (Boolean) und ein Memo (für mein Bsp.)
Habs getestet funzt...
Delphi-Quelltext 1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18:
| var stop: Boolean;
procedure TForm1.Button1Click(Sender: TObject); var i: Integer; begin Stop := False; for i := 1 to 100000 do begin Application.ProcessMessages; if Stop then Exit; Memo1.Lines.Add(IntToStr(i)); end; end;
procedure TForm1.Button2Click(Sender: TObject); begin stop := True; end; |
_________________ Gehirn: ein Organ, mit dem wir denken, daß wir denken. - Ambrose Bierce
|
|
blackbirdXXX
Beiträge: 1077
Erhaltene Danke: 1
Ubuntu Dapper
|
Verfasst: Do 15.01.04 16:46
*auf die Stirn hau* auf sowas hätt ich auch kommen können...
_________________ Klein, schwarz und ärgert Techniker? Jumper!
|
|
Chatfix
Beiträge: 1583
Erhaltene Danke: 10
Win 10, Win 8, Win 7, Win Vista, Win XP
VB.net (VS 2015), MsSQL (T-SQL), HTML, CSS, PHP, MySQL
|
Verfasst: Do 15.01.04 17:23
Jop manchmal sieht man den Wald vor lauter Bäumen nicht *gg*
[scherz]Bekomm ich dafür ne Dankeszeile (Schriftgröe 20 oder so *fg*) im Programm? [/scherz]
_________________ Gehirn: ein Organ, mit dem wir denken, daß wir denken. - Ambrose Bierce
|
|
blackbirdXXX
Beiträge: 1077
Erhaltene Danke: 1
Ubuntu Dapper
|
Verfasst: Do 15.01.04 19:57
Also wieder eine neue Version:
1.) der Bug mit dem Dateiinfo ist weg.
2.) Man kann nun Texte als Füllmuster nehmen. Die kann man auch aus einer Datei laden.
3.) Mit Esc kann man die Vorschau und den Speichervorgang abbrechen.
_________________ Klein, schwarz und ärgert Techniker? Jumper!
|
|
StefanH
Beiträge: 1144
Win XP
D5 Standard, D7 Pers, D2005 Pers
|
Verfasst: Do 15.01.04 21:07
hihih, hat dos.txt einen Sinn?
_________________ "Als es noch keine Computer gab, war das Programmieren noch relativ einfach."(Edsger W. Dijkstra)
"Ich bin nicht von Sinnen, sondern ich rede wahre und vernünftige Worte." (Paulus)
|
|
Chatfix
Beiträge: 1583
Erhaltene Danke: 10
Win 10, Win 8, Win 7, Win Vista, Win XP
VB.net (VS 2015), MsSQL (T-SQL), HTML, CSS, PHP, MySQL
|
Verfasst: Do 15.01.04 21:12
StefanH hat folgendes geschrieben: | hihih, hat dos.txt einen Sinn? |
Häääää?
_________________ Gehirn: ein Organ, mit dem wir denken, daß wir denken. - Ambrose Bierce
|
|
blackbirdXXX
Beiträge: 1077
Erhaltene Danke: 1
Ubuntu Dapper
|
Verfasst: Do 15.01.04 21:35
Du musst es als Füllmuster öffnen. Ich habe es mit dem DOS.bmp dazugegeben. Schaut lustig aus wenn alle Dos Befehle auf dem Logo sind.
_________________ Klein, schwarz und ärgert Techniker? Jumper!
|
|
Chatfix
Beiträge: 1583
Erhaltene Danke: 10
Win 10, Win 8, Win 7, Win Vista, Win XP
VB.net (VS 2015), MsSQL (T-SQL), HTML, CSS, PHP, MySQL
|
Verfasst: Do 15.01.04 21:40
Wieso wird eigentlich als einzigstes der Fenster-Titel nicht gespeichert?
Bei jedem neuen öffnen steht wieder Dein programm name da...
Wie wäre es wenn du "Projekt-Dateien" als Feature hinzufügst.
Muss ja nur ne ini sein, in der alle einstellungen extra gespeichert / geladen werden kann...
_________________ Gehirn: ein Organ, mit dem wir denken, daß wir denken. - Ambrose Bierce
|
|
blackbirdXXX
Beiträge: 1077
Erhaltene Danke: 1
Ubuntu Dapper
|
Verfasst: Do 15.01.04 21:51
Das mit dem Titel habe ich übersehen. Wurde schon ausgebessert. Wie meinst du das mit Projekt-Dateien?
_________________ Klein, schwarz und ärgert Techniker? Jumper!
|
|
Chatfix
Beiträge: 1583
Erhaltene Danke: 10
Win 10, Win 8, Win 7, Win Vista, Win XP
VB.net (VS 2015), MsSQL (T-SQL), HTML, CSS, PHP, MySQL
|
Verfasst: Do 15.01.04 23:14
na das man alle einstellungen seperat speichern kann...
so könnte man für jedes bmp andere einstellungen machen und somit mehrere projekte verwalten...
_________________ Gehirn: ein Organ, mit dem wir denken, daß wir denken. - Ambrose Bierce
|
|
Da_Knuddelbaer
Beiträge: 485
|
Verfasst: Fr 16.01.04 16:52
siehe Delphi und dessen Projekt-Dateien
Mir gefällt das Prog auch
Eine Sache nur: Bei größeren Bildern schneidet der immer das meiste ab, und ein größerer Teil des Bildes gerät in den untersten Zeilen dabei irgendwie durcheinander und sieht damit dann nicht mehr wie das ursprüngliche Bild aus
Wie gesagt, mit kleineren Bildern klappts auf Anhieb und wunderbar
Greetz,
Knuddelbaer
|
|
blackbirdXXX
Beiträge: 1077
Erhaltene Danke: 1
Ubuntu Dapper
|
Verfasst: Fr 16.01.04 21:54
Das liegt daran das ich die Tabelle nicht richtig berechne. Ich habe so einen Schätzwert für die Breite genommen. Aber vielleicht kann mir ja einer sagen wie ich die Breite einer Tabelle richtig errechne. Bei Mozilla geht es auch ohne Angabe von Breite.
_________________ Klein, schwarz und ärgert Techniker? Jumper!
|
|