Jump to content

UniFormattedNumberEdit.FormattedInput.CurrencySign := '€';


pro_imaj

Recommended Posts

Merhaba;

 

Form açıldığın bir Combobox ile para birimi seçtiriyorum ve aşağıdaki kod satırı işliyor, fakat  hiçbir değişiklik olmuyor!

Aşağıdaki aynı kodu form create edilirken uyguladığımda sorunsuz çalışıyor.

UniFormattedNumberEdit.FormattedInput.CurrencySign := '€';

Bu sorunu nasıl çözebilirim.

Link to comment
Share on other sites

Evet doğru, uniGUI'de tüm özellikleri runtime esnasında değiştirmek mümkün değil.

 

Bir fatura kesiyorsunuz diyelim, faturanın para birimini değiştirmek istediğinde görüntüyü değiştirmem gerekiyor.

Script yardımıylada mı olmaz? 

Link to comment
Share on other sites

Merhaba,

procedure TMainForm.UniButton1Click(Sender: TObject);
begin
  with UniFormattedNumberEdit1 do
    if FormattedInput.ShowCurrencySign then
    begin
      FormattedInput.CurrencySign := '€';
      with JSInterface do
      begin
        JSAssign('uniFmtObj.aSign', [FormattedInput.CurrencySign]);
        JSCallGlobal('var el='#1';var inputEl=el.inputEl;if(inputEl) inputEl=$("#"+el.inputEl.id); '+
                     'if(inputEl) inputEl.autoNumeric', ['update',JSObject('aSign:el.uniFmtObj.aSign')]);
      end;
    end;
end;
Link to comment
Share on other sites

 

Merhaba,

procedure TMainForm.UniButton1Click(Sender: TObject);
begin
  with UniFormattedNumberEdit1 do
    if FormattedInput.ShowCurrencySign then
    begin
      FormattedInput.CurrencySign := '€';
      with JSInterface do
      begin
        JSAssign('uniFmtObj.aSign', [FormattedInput.CurrencySign]);
        JSCallGlobal('var el='#1';var inputEl=el.inputEl;if(inputEl) inputEl=$("#"+el.inputEl.id); '+
                     'if(inputEl) inputEl.autoNumeric', ['update',JSObject('aSign:el.uniFmtObj.aSign')]);
      end;
    end;
end;

 

Teşekkürler sorunsuz çalıştı.

Link to comment
Share on other sites

Please sign in to comment

You will be able to leave a comment after signing in



Sign In Now
×
×
  • Create New...