Fragen zur Komponente TPanel

[hoika]

Hallo,

setz Caption mal testweise im Object-Inspector.
Klappt es doch, liegt es an deinem Code.
Hast du die betreffenden Zeilen mal durch den Debugger geschickt ?

Ausserdem enthält der Original-Code einen Haufen Components[i] as TPanel

Delphi-Quellcode:

var
  Panel: TPanel;
begin
  if 
    if then
    begin
      Panel:= Components[i] as TPanel

Das lässt sich auch besser debuggen.


Heiko

[yasR]

nein.. die Captioneingabe ist im Objektinspektor gesetzt, liegt wohl daran das TImage keine Captioneigenschaft hat.

[hoika]

Hallo,

natürlich hat TImage kein Caption, ist ja ein Bild ...
Wazu soll das Captio denn gut sein ?
reicht nicht ein Unterschrift,
also im BasePanel 2 weitere, eines alClient (mit TImage drauf)
und eines alBottom als Unterschrift.


Heiko

[himitsu]

img[i].Canvas.TextOut und dann damit noch zentriert die (Components[i] as TPanel).Caption ausgeben.