Mam sobie procedurę:
for I:=0 to ListBox1.Items.Count-1 do
if Pos(Edit1.Text;, ListBox1.Items[i])>0 then
ListBox2.Items.Add(ListBox1.Items[i]);
Jak zrobić aby program nie rozróżniał wielkości znaków.
Nie chcę zmieniać wielkości znaków.
Mam sobie procedurę:
for I:=0 to ListBox1.Items.Count-1 do
if Pos(Edit1.Text;, ListBox1.Items[i])>0 then
ListBox2.Items.Add(ListBox1.Items[i]);
Jak zrobić aby program nie rozróżniał wielkości znaków.
Nie chcę zmieniać wielkości znaków.
LowerCase lub UpperCase.. jak wolisz :)
AndRew nie o to mi chodziło. Chodzi mi o to aby np w listbox1 znajdują się następujące pola np. aaa, Aaa i BaA wpisując w edit aa żeby w listbox2 pojawiały się wszystkie pozycje niezależnie od wielkości liter.
Wydaje mi się, że trzeba będzie tak:
for I:=0 to ListBox1.Items.Count-1 do
if Pos(UpperCase(Edit1.Text), UpperCase(ListBox1.Items[i]))>0 then
ListBox2.Items.Add(ListBox1.Items[i]);
Dzięki Marooned nie wydawało Ci się!!!!!!!!
1) Zapewne AndRew to właśnie miał na myśli
2) Polecam zamienić "UpperCase(Edit1.Text)" na jakąś zmienną i przypisać jej tą wartość przed pętlą.
Polecam raczej AnsiUpperCase, bo UpperCase nie zmienia polskich liter. To samo dotyczu AnsiLowerCase.
//No oczywiście - masz rację - zasugerowałem się postem AndRew - Marooned