jezyki

mam plik *.enu chce w programie zmieniac jezyk na angielski co mam zrobic bo adam b. pominal ta jakze "nieistotna" drobnostke...;/ pomocy co mam zrobic??

Przejrzyj sobie RichEdit Demo (katalog Delphi\Demos)
Naciśnij też F1 i wpisz language versions, czy coś podobnego, i dowiesz się :-)

przegladalem ale to nic nie dalo... nic nie rozumiem... prosze o pomoc.. a w helpie tez za wiele nie ma...;/

@$##@!

Zrób sobie wersję językową, tak, jak opisał Adam.
Później zajrzyj do demo RichEdit'a.

Skopiuj unit Reinit.pas do swojego projektu.

const

  ENGLISH = (SUBLANG_ENGLISH_US shl 10) or LANG_ENGLISH;
  FRENCH  = (SUBLANG_FRENCH shl 10) or LANG_FRENCH;
  GERMAN  = (SUBLANG_GERMAN shl 10) or LANG_GERMAN;

Ustaw sobie stałe w programie (języki).

I analizuj procedurę

procedure TMainForm.SwitchLanguage(Sender: TObject);

Więcej nie powiem :-P

Mam problem ze zmiana jezyka... Jak to zrobic poprzez klikniecie w button np. Polish, a pozniej English? Moze ktos mi to dokladniej wytlumaczyc?

dostales juz duza podpowiedz... nie oczekuj gotowca.....

procedure TMainForm.SwitchLanguage(Sender: TObject);
var
  Name : String;
  Size : Integer;
begin
  if LoadNewResourceModule(TComponent(Sender).Tag) <> 0 then
  begin
    Name := FontName.Text;
    Size := StrToInt(FontSize.Text);
    ReinitializeForms;
    LanguageEnglish.Checked := LanguageEnglish = Sender;
    LanguageFrench.Checked  := LanguageFrench  = Sender;
    LanguageGerman.Checked  := LanguageGerman  = Sender;

    CurrText.Name := Name;
    CurrText.Size := Size;
    SelectionChange(Self);
    FontName.SelLength := 0;

    SetupRuler;
    if Visible then Editor.SetFocus;
  end;
end;

I tak tez robie. Ale zmienilem germany na polish i usunolem french. w const dodalem LANG_POLISH i mi blad wywalalo w tym miejscu :(