|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Сортировка по фамилии
У меня не удается отсортировать список фамилий
ввожу в Еdit первую букву, а сортировка не происходит, или второй вариант,- пропадает список фамилий вообще |
#2
|
||||
|
||||
А код предоставить не судьба, или тут все должны сидеть и гадать как там чего и к чему привязано?
|
#3
|
|||
|
|||
Если...
procedure TForm1.PoiskEditChange(Sender: TObject); begin if Length(PoiskEdit.Text)>0 then DataModule1.ADOTable1.Filtered:=true else DataModule1.ADOTable1.Filtered:=false; DataModule1.ADOTable1.Filter:='Фамилия>'''+PoiskEd it.Text+''''; end; end. то, поиск не проводится ваапче А если... procedure TDataModule1.ADOTable1FilterRecord(DataSet: TDataSet; var Accept: Boolean); begin Accept:=false; if copy(ADOTable1DSDesigner.AsString,1,Length(Form1.P oiskEdit.Text))= Form1.PoiskEdit.Text then Accept:=true; end; end. то список фамилий пропадает первый раз такое делаю,может, что не так Ну, или подскажите метод сортировки, что-ли Последний раз редактировалось Kristofer, 21.07.2006 в 14:17. |
#4
|
||||
|
||||
А ты уверен, что надо писать так
DataModule1.ADOTable1.Filter:='Фамилия>'''+PoiskEd it.Text+''''; а не так DataModule1.ADOTable1.Filter:='Фамилия='''+PoiskEd it.Text+''''; |
#5
|
|||
|
|||
список по прежнему пропадает
может подскажете свою методу а то в голове полный абзац |
#6
|
|||
|
|||
Эге-гей!!!!!!!!
там, что, смертность резко возросла? куда все пропали? |
#7
|
|||
|
|||
ВСЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁЁ
разобрался, мой вариант был правильный, я просто допустил одну маленькую глупость |
#8
|
||||
|
||||
Расскажи какую глупость, чтобы мы ее не совершали
|
#9
|
|||
|
|||
надо было указать номер столбца с которым работал (фамилия)
сейчас бука нет ссобой, значит, подробно расскажу завтра |