Einzelnen Beitrag anzeigen

Benutzerbild von sniper_w
sniper_w

Registriert seit: 11. Dez 2004
Ort: Wien, Österriech
893 Beiträge
 
Delphi 6 Enterprise
 
#1

TButton verschwindet von sich selbst

  Alt 16. Apr 2006, 21:58
Ich weiss jetzt nicht warum dies passiert, ist es vielleicht ein VCL Bug oder ist es mein Bug ? Wie auch immer mein TButton verschwiendet und kommt erst wieder vor wenn ich zB die Größe des Formular ändere ( via Mouse...).

Relevante Code dazu:
Delphi-Quellcode:
procedure TmainForm.UpdateColumnsWidths(TheListView: TListView);
var
  i, w: Integer;
begin
  w := TheListView.Width div TheListView.Columns.Count - 5;
  for i := 0 to TheListView.Columns.Count - 1 do
  begin
    TheListView.Column[i].Width := w;
    TheListView.Column[i].MinWidth := w;
    TheListView.Column[i].MaxWidth := w;
  end;
end;
//...
procedure TmainForm.FormResize(Sender: TObject);
begin
  UlazGroupBox.Height := Height div 2 - BottomPanel.Height;
  IzlazGroupBox.Height := UlazGroupBox.Height;
  UpdateColumnsWidths(IzlazListView);
  UpdateColumnsWidths(UlazListView);
end;

//-> weitere info IzlazListView.Align := alClient; IzlazListView.Parent := IzlazGroupBox;
//-> weitere info UlazListView.Align := alClient; UlazListView.Parent := UlazGroupBox;
//-> DAS Button -> StanjeButton.Parent := BottomPanel;
// alle andere Properties sind unverändert
Danke.

EDIT:
Das Fehler kann man reproduzieren indem man "Maximize" und dann wieder "Restore" klikt.
Miniaturansicht angehängter Grafiken
falsch_167.jpg   richtig_784.jpg  
Angehängte Dateien
Dateityp: zip finansije_525.zip (252,8 KB, 7x aufgerufen)
Katura Haris
Es (ein gutes Wort) ist wie ein guter Baum, dessen Wurzel fest ist und dessen Zweige in den Himmel reichen.
  Mit Zitat antworten Zitat