Usar consoantes acentuadas

[Leomar]

Olá, estou querendo desenvolver um programa no Delphi 7 em Esperanto (idioma), e costumo usar muito letras como "ŝ" e "ĉ", mas o Delphi 7 não reconhece estas consoantes acentuadas e troca tudo para "s" e "c" nos captions e edits.

Tem como fazer um jeito do Delphi aceitar consoantes acentuadas?

[Jhonas]

Olá, estou querendo desenvolver um programa no Delphi 7 em Esperanto (idioma), e costumo usar muito letras como "ŝ" e "ĉ", mas o Delphi 7 não reconhece estas consoantes acentuadas e troca tudo para "s" e "c" nos captions e edits.

Tem como fazer um jeito do Delphi aceitar consoantes acentuadas?

Sim basta voce mudar a definição do campo da sua tabela para usar o

Character Set ISO8859_3 Latin3—Southern European (Maltese, Esperanto)

http://74.125.113.132/search?q=cache:89tdW...=clnk&gl=br

abraço

[Leomar]

Neste caso então só usando o firebird né?

Aproveitando, queria outra dica para algo básico. Tenho uma funcionária extrangeira que vive trocando o (é) por (´r) e isto as vezes me dá umas dores de cabeça (atrazei dois pédidos para uma Débora porque ela digitou D´rbora).

Tem algum código simples para edits e dbedits para que, toda vez que for digitado ´r ele troque na hora por é?

[Jhonas]

Neste caso então só usando o firebird né?

pode ser interbase ou oracle tambem

Aproveitando, queria outra dica para algo básico. Tenho uma funcionária extrangeira que vive trocando o (é) por (´r) e isto as vezes me dá umas dores de cabeça (atrazei dois pédidos para uma Débora porque ela digitou D´rbora).

Tem algum código simples para edits e dbedits para que, toda vez que for digitado ´r ele troque na hora por é?

É bem simples ... veja

procedure TForm1.Edit1Change(Sender: TObject);
var s : string;
begin
   s := Edit1.text;
   if pos('´r',s) > 0 then
      begin
         delete(s,pos('´r',s),2);
         insert('é',s,pos('´r',s)+2);
         Edit1.text := s;
         TEdit(Sender).SelStart := Length(Edit1.text);
      end;
end;

abraço