Re: MenuBarObj SizeToFit also on Financial MenuBar possible?

[User (Legacy)]

Hello Frank, 

But that is wgat I am already doing. 

Here's what I do: 

{Setting Global variable} 

var 

FinExt: FinancialCharts; 

{FormCreate event} 

{Adding Financial Extension} 

FinExt := CoFinancialCharts.Create; 

ChartFX1.AddExtension(FinExt); 

{Dutch1 is a normal menufunction to choose the local language instead of 

english} 

Dutch1.Click; 

{Later in the code you will find the Dutch1Click procedure} 

procedure TfrmMain.Dutch1Click(Sender: TObject); 

var 

 sWinDir:String; 

 iLength:Integer; 

begin 

{Initialise Variables and determine the default windows directory} 

 iLength := 255; 

 setLength(sWinDir, iLength); 

 iLength := GetWindowsDirectory(PChar(sWinDir), iLength); 

 setLength(sWinDir, iLength); 

{Localize} 

 ChartFX1.Language(sWinDir + '\dutch1.dll'); 

 ChartFX1.MenuBarObj.SizeToFit; 

 FinExt.Language(sWinDir + '\dutch2.dll'); 

end; 

Like you see with ChartFX1.MenuBarObj I can do a SizeToFit but there is no 

such thing for FinExt. 

Hope you have another idea. 

Regards, 

Maurice Wasbauer 

"Francisco Padron" <frankp@softwarefx.com> wrote in message 

news:DE0379D14694D211B4CE00609770710D04B648@sftfx-221.wamnet.net... 

> Load your language file FIRST and then turn on the Menu/Tool bar. 

> 

> Frank 

> SFX 

>