Präsentations-Software "ShowAct"

[hansklok]

Hi,

axelf98 mit seinem Programm Easy Foto-Show 2005 hat mir entgültig nen Ruck gegeben. Seit Monaten hatte ich vor ein Bildschirmpräsentations-Programm zu schreiben. Jedoch hatte ich ein bissl Schiss vor der OOP. Jetzt habe ich mich herangetraut und angefangen meine ersten Klassen TPresentation und TFolie zu schreiben. Im Anhang habe ich mal ein Projekt mit den Dateien (Klassen-Units). Wenn ich eine Folie erzeugen will, stürzt das Programm ab. Ich wäre dankbar, wenn ihr euch das mal ansehen könntet und eventuell den Fehler findet (4,6,8 ... Augen sehen mehr, als 2).

danke im Vorraus

MfG

hansklok (Guten Rutsch ins neue Jahr 2006)

[Der_Unwissende]

Hi,
dein Fehler liegt in dem Konstruktor deiner TFolie. Da setzt du die Eigenschaften von self.Pen und self.Brush, allerdings werden die nie angelegt. Da diese Klasse einen eigenen Canvas hat (den der übergebenen Folie) solltest du evtl (kenn die Idee hinter deinem Programm nicht) einfach die Eigenschaften des Pen des Canvas setzen

Delphi-Quellcode:

self.Canvas.Pen.Color := VFarbe;
...

oder einfach den Pen und Brush auch im Konstruktor erzeugen.

Gruß Der Unwissende

Und natürlich nen guten Rutsch

[hansklok]

Danke, ich habe es herausgefunden, alles funktioniert Super, DANKE!

MfG

hansklok
P.S.


Mehr von "ShowAct!" gibt es demnächst an dieser Stelle!

[hansklok]

Hi,

ich suche für das Projekt ernsthaft interessierte Mit-Programmierer. Ihr solltet euch auf dem Gebiet der Grafik- und Objektorientierten Programmierung schon etwas auskennen. Wer Interesse hat eine Freeware Präsentations-Software mit zu programmieren, der kann mir ja ne PN schreiben!

MfG

hansklok

[Rastaman]

Hallo. Ich bin zwar nicht so an daran interessiert, an einer Präsentationssoftware mitzuwirken, aber ein kleiner Tip:

In der Unit uPresentation.pas, könntest du die 6 Funktionen (GetDatum, GetAuthor...) doch einfach durch Properties ersetzen.
Denke, dass ist hier ziemlich angebracht.

Frohes Neues Jahr!