Tchart da bulunan Series lerin tam ekran sorunu

[cinarbil]

Hayırlı günler.
Delphi tokyo kullanıyorum.

formda iki adet tchart ekli bunların içindede birer adet series var 
birinci   anchors özelliği Akleft, Aktop ve align alleft
ikincisi  anchors özelliği Aktop, Akright ve align alright

ekran çözünülüğü default olarak 1200*700 geliyor resim 2 de göründüğü gibi sorun yok 
ama tam ekran yapınca tchart  sol üst ve sag üstte büyüyor ama arası boş kalıyor. resim 1
içindeki series  ler saga sola genişlemiyor
ayarları hakkında bilgisi olan yardımcı olabilir mi lütfen ?

[mrmarman]

Form, hatta daha iç seviyede düşünürsek Chart'ların parenti olan panel vb. TWinControl olan hangisiyse, onun OnResize isimli bir eventi vardır illa ki...

OnResize olayına şu aşağıdaki kodu düzenleyin 

Aşağıdaki örnekte Form'un OnResize eventine koysak da, eğer form altında Panel de yeniden boyutlanıyor ise, PARENT olarak ilgili panel vardır. 
Bu durumda ölçümde formun değil PARENT neyse onun ClientWidth özelliği değerlendirmeye alınır. 
Yani daima hep Chart1 ve Chart2'nin içinde olduğu TWinControl değerlendirmeye alınarak doğru şekilde ekranda ikiye bölünecektir.

procedure TForm1.FormResize(Sender: TObject);
var
  LWidth : Integer;
begin
  LWidth := trunc( Chart1.Parent.ClientWidth * 0.5 );

  Chart1.Width := LWidth;
  Chart2.Width := LWidth;
end;

[cinarbil]

(12-11-2024, Saat: 13:18)mrmarman Adlı Kullanıcıdan Alıntı: Form, hatta daha iç seviyede düşünürsek Chart'ların parenti olan panel vb. TWinControl olan hangisiyse, onun OnResize isimli bir eventi vardır illa ki...

OnResize olayına şu aşağıdaki kodu düzenleyin 

Aşağıdaki örnekte Form'un OnResize eventine koysak da, eğer form altında Panel de yeniden boyutlanıyor ise, PARENT olarak ilgili panel vardır. 
Bu durumda ölçümde formun değil PARENT neyse onun ClientWidth özelliği değerlendirmeye alınır. 
Yani daima hep Chart1 ve Chart2'nin içinde olduğu TWinControl değerlendirmeye alınarak doğru şekilde ekranda ikiye bölünecektir.

procedure TForm1.FormResize(Sender: TObject);
var
  LWidth : Integer;
begin
  LWidth := trunc( Chart1.Parent.ClientWidth * 0.5 );

  Chart1.Width := LWidth;
  Chart2.Width := LWidth;
end;

Allah razı olsun teşekkür ederim işimi gördü.