| Autor |
Beitrag |
MH1987
      
Beiträge: 98
|
Verfasst: Di 15.01.08 22:32
Hi,
ich würde gerne ein Programm schreiben, dass einen Text in dieser Form einliest:
[a]Abends [e]treten Elche [a]aus den Dünen....
Dabei stehen die in eckigen Klammern stehenden Buchstaben für den entsprechenden Akkord. Dieser soll dann in der Ausgabe über dem Wort stehen.
hier zB so:
Delphi-Quelltext 1: 2:
| a e a Abends treten Elche aus den Dünen.... |
Ich hab bisher geschafft die Akkorde aus dem Text zu filtern.
Ich hab aber noch leider keine Idee, wie ich die Akkorde an die entsprechende Stelle bekomme, da zB nicht alle Buchstaben gleich sind...
Hat jemand eine Idee?
Liebe Grüße,
Mattias
|
|
Lannes
      
Beiträge: 2352
Erhaltene Danke: 4
Win XP, 95, 3.11, IE6
D3 Prof, D4 Standard, D2005 PE, TurboDelphi, Lazarus, D2010
|
Verfasst: Di 15.01.08 23:40
Hallo,
wenn Du uns jetzt noch aufklärst wo der Text ausgegeben werden soll können wir vermutlich helfen
? --> proportionale Schrift
? --> canwas.Textwith
? --> canwas.TextOut
_________________ MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )
|
|
MH1987 
      
Beiträge: 98
|
Verfasst: Mi 16.01.08 00:45
habs jetzt mit nem Bitmap und textout gemacht. klallpt super. Wäre aber noch besser, wenn ich das als Text hätte und nicht als Bild...
Gruß,
Matthias
|
|
Lannes
      
Beiträge: 2352
Erhaltene Danke: 4
Win XP, 95, 3.11, IE6
D3 Prof, D4 Standard, D2005 PE, TurboDelphi, Lazarus, D2010
|
Verfasst: Mi 16.01.08 07:51
Hallo,
als Text in einer Datei?
--> in welchem Format?
als Text auf dem Bildschirm?
--> in welchem Element?
--> RichEdit?
--> Memo? --> = proportionale Schrift
_________________ MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )
|
|
MH1987 
      
Beiträge: 98
|
Verfasst: Mi 16.01.08 19:56
im Memo wärs toll  ne txt datei würde aber auch gehen
Gruß,
Matthias
|
|
nagel
      
Beiträge: 708
Win7, Ubuntu 10.10
|
Verfasst: Mi 16.01.08 20:39
Dann wär's das einfachste, eine dicktengleiche Schrift zu wählen, also eine Schrift, bei der alle Zeichen gleich breit sind (z.B. Courier New).
|
|
Lannes
      
Beiträge: 2352
Erhaltene Danke: 4
Win XP, 95, 3.11, IE6
D3 Prof, D4 Standard, D2005 PE, TurboDelphi, Lazarus, D2010
|
Verfasst: Do 17.01.08 00:10
Hallo,
genau, z.B. Courier New
wie ich bereits geschrieben hatte:
| Zitat: | | --> Memo? --> = proportionale Schrift |
dann kannst Du den Abstand zwischen den Akkord-Zeichen mit Leerzeichen auffüllen, da hilft StringOfChar oder Format.
Wenn der so formatierte Text im Memo steht, ist es kein Problem diesen als Text zu speichern.
Zeig doch mal Deinen Code zur Filterung der Akkorde, dann kann man Dir darauf aufbauend helfen.
_________________ MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )
|
|
nagel
      
Beiträge: 708
Win7, Ubuntu 10.10
|
Verfasst: Do 17.01.08 09:06
@Lannes: Eine proportionale Schrift ist aber gerade das Gegenteil von dem, was ich vorgeschlagen habe. 
|
|
Lannes
      
Beiträge: 2352
Erhaltene Danke: 4
Win XP, 95, 3.11, IE6
D3 Prof, D4 Standard, D2005 PE, TurboDelphi, Lazarus, D2010
|
Verfasst: Do 17.01.08 10:06
Hallo,
nagel hat folgendes geschrieben: | @Lannes: Eine proportionale Schrift ist aber gerade das Gegenteil von dem, was ich vorgeschlagen habe.  |
au man  , peinlich  , da hab ich mich ja ganz schön verdrückt ausgekehrt.
wikipedia: Eine nichtproportionale Schriftart, auch Monospace-Schriftart, Festschrittschrift, Konstantschrift oder dicktengleiche Schrift
_________________ MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )
|
|
MH1987 
      
Beiträge: 98
|
Verfasst: Do 17.01.08 14:31
soo... hab jetzt soweit ein Programm. (siehe Anhang, auch mit Quelltext, jedoch glaub ich kaum das da jemand durchsteigt  habs nich sehr sauber hingeschrieben...)
Gibt es denn auch eine Möglichkeit mit einer anderen Schriftart die nicht dicktengleich ist?
hab auch mal mein Programm, was ein Bild erzeugt angehangen, war auch eine Möglichkeit.
Gruß,
Matthias
Einloggen, um Attachments anzusehen!
|
|
MH1987 
      
Beiträge: 98
|
Verfasst: Do 17.01.08 15:47
hab mit noch was neues überlegt:
ich würde gerne mein Programm jetzt soweit erweitern dass es folgendes macht:
es soll mit ein *.bmp erstellen, dass aufgebaut ist aus: 2 Bitmaps und meinem Akkordtext.
ich hab mal ein Beispiel, dass ich mit word erstellt hab angehangen.
Wie kann ich das am besten umsetzen? Ich wollte eigentlich mit form.getimage alles speicher, aber dann passt da ja nicht alles drauf.
Hat jemand eine Idee?
Gruß,
Matthias
Einloggen, um Attachments anzusehen!
|
|
nagel
      
Beiträge: 708
Win7, Ubuntu 10.10
|
Verfasst: Do 17.01.08 16:01
Ein TBitmap-Objekt in der richtigen Größe erstellen, mittels Bitmap.Canvas.CopyRect die anderen drei Bitmaps in dein neues kopieren und das dann mit Bitmap.SaveToFile speichern.
|
|
MH1987 
      
Beiträge: 98
|
Verfasst: Do 17.01.08 16:20
ahh  super dankee!
|
|
MH1987 
      
Beiträge: 98
|
Verfasst: Fr 18.01.08 02:34
nochmal eine kleine Frage
hab das Programm jetzt soweit fertig das es mir das Lied-Blatt als bmp ausgibt. Ziel soll letztendlich aber pdf sein. Nutze zur Zeit ein programm aus dem inet was mit bilder in pdfs umwandelt.
Kann man das mit Delphi auch? Sprich, dass ich das ganze gar nicht erst als bmp speichere, sondern direkt als pdf?
Freue mich über eine Antwort!
Gruß,
Matthias
|
|
nagel
      
Beiträge: 708
Win7, Ubuntu 10.10
|
Verfasst: Fr 18.01.08 10:55
Kostenlos gibt's da afaik nichts.
Ansonsten einfach googlen, da findet man genug. Ein Beispiel wäre diese PDF-Library, bei der es auch eine kostenlose Demoversion sowie eine brauchbare Anleitung gibt.
|
|
Shorty
      
Beiträge: 107
Win XP, Ubuntu 8.04
Delphi 7 Prof., Delphi 2005 Pers.
|
Verfasst: Fr 18.01.08 15:43
Ich habe einmal was mit PDFs gemacht, da habe ich das Projekt [url= www.est.hi-ho.ne.jp/...erpdf]PowerPDF[/url] gefunden, das steht unter der GPL, kann also unter den Bedingungen frei benutzt werden.
Soweit ich mich erinnere, malt man den gewünschten Inhalt einer PDF auf eine Canvas und lässt das fertige PDF dann generieren, der Aufwand, wenn du das Blatt schon als bmp hast, hält sich also in Maßen.
MfG Shorty
|
|