Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Bjoerk,
13. Nov 2016
So (ähnlich) hab ich's nun gemacht. Ein Panel und eine Scrollbar (sbVertical, alRight) drauf. Für die Scrollbar Min und Max Position setzen. Dann nur noch die aktuelle Position weiterleiten. Position blättert ThumbImage.Height weise.
procedure TViewerForm.FormCreate(Sender: TObject);
const
cThumbHeight = 198;
var
I, ATop, ThumbImagesCount: integer;
begin
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Bjoerk,
12. Nov 2016
Nein, das stimmt nicht so einfach. Der Owner kann bei vielen Controls ja auch auch nil sein.
D2007 Hilfe: "Die in TControl deklarierte Eigenschaft Parent ähnelt der Eigenschaft Owner von TComponent darin, dass die hier angegebenen Objekte für das Freigeben des Steuerelements zuständig sind. Jedoch ist das in Parent enthaltene Objekt immer eine fensterorientierte Komponente, die das...
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Bjoerk,
11. Nov 2016
Ich glaub, es reicht sogar nur der Parent.
Die Idee mit dem LoadOnView von Mavarik gefällt mir. Man könnte so 20 Seitenminiaturen vorhalten. Der Pdf Reader wird es wohl ähnlich machen. Hat jemand eine Idee, wie man so was realisieren könnte?
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Bjoerk,
11. Nov 2016
Versteh ich nicht? AImage ist TImage.Create. Der Owner bzw. das Parent geben es wieder frei.
Forum: Algorithmen, Datenstrukturen und Klassendesign
Delphi
by Bjoerk,
11. Nov 2016
Ich habe einen Ergebnislister, der ähnlich wie Adobe pdf Reader Seitenminiaturen anzeigt. Im Beispiel habe ich 316 Seiten, was 316 Images mit Bitmaps 210 x 279 (183 kB) bedeutet.
Das Problem ist, daß nach 188 Images Schluß ist und das Onklick nur bis Seite 94 funktioniert.
Ist das ein Speicherproblem und /oder kann eine Scrollbox nicht ca. 100.000 Pixel hoch sein?
Erzeugen tue ich...