AnsiUpperCase nie działa

Witam,

Chciałem przekształcić do wielkich liter pewien łańcuch z polskimi literami, więc użyłem AnsiUpperCase (bo UpCase nie działa). Niestety to nie działa na polskie litery:

Edit1.Text := 'żółty';
AnsiUpperCase(Edit1.Text);

i dostaję:

żółTY

Co może być nie tak?

Obstawiam Win'a z innym locale, albo że ten łańcuch to unicode. Może spróbuj czegoś z Wide*.
b

A jest jakaś funkcja, która przekształca polskie znaki w zwykłe literki? Np ż -> z

Takową można bardzo łatwo napisać... ale takie problemy już dawno były i na pewno taka funkcja już jest.

Jakie Delphi? U mnie na 2006 działa prawidłowo:

uses windows,sysutils;

var s,p:string;
begin
  s:='żółty';
  p:=AnsiUpperCase(s);
  MessageBox(0,pchar(p),nil,mb_ok);
end.

Zamiast

Edit1.Text := 'żółty';
AnsiUpperCase(Edit1.Text);

Zastosuj jako wynik funkcji

Edit1.Text := AnsiUpperCase('żółty');