TNotebook macht Schwierigkeiten

Rund um die LCL und andere Komponenten
Boneless
Beiträge: 52
Registriert: So 1. Dez 2013, 14:15
OS, Lazarus, FPC: Windows 7 (L 1.0.14 - FPC 2.6.0)
CPU-Target: 64Bit
Wohnort: Ostsee

Re: TNotebook macht Schwierigkeiten

Beitrag von Boneless »

Ich habs mit nem zweiten Bild genau so wie beim ersten, eigentichen Hintergrundbild, gemacht. Da funktionierts :shock:

Ich verstehs nicht.

Code: Alles auswählen

Image:=TImage.Create(Self);
  NochmalImage:=TImage.Create(Self);
  Image.Stretch:=True;
  NochmalImage.Stretch:=False;
  Image.Picture.LoadFromFile('img\bgimg.jpg');
  NochmalImage.Picture.LoadFromFile('img\cdicon.png');
  Image.Width:=Page1.ClientWidth;
  Image.Height:=Page1.ClientHeight;
  Image.Parent:=Page1;
  NochmalImage.Width:=256;
  NochmalImage.Height:=256;
  NochmalImage.Parent:=Page1;
  NochmalImage.Left:=575;
  NochmalImage.Top:=187;
Bei NochmalImage klappts. Beim normalen Image nicht.
Was ich auch nicht verstehe, wenn ich die Pfade zu den Bildern beider Images tausche, dann funktionierts! Dann wird "bgimg.jpg" im Feld des "cdicon.png" auch angezeigt

EDIT: Ich habs rausgefunden. Es lag an der Client Höhe und Breite. Ich hab's einfach mit den absoluten Zahlenwerten der Form ersetzt und nun klappts :)

Code: Alles auswählen

program Boneless;
 
 {$mode Einsteiger}{H+}

Antworten