Форум: "Начинающим";
Текущий архив: 2007.11.11;
Скачать: [xml.tar.bz2];
Внизкак вывести результат поиска по базе в Edit Найти похожие ветки
← →
Neo © (2007-10-19 15:34) [0]Доброго времени суток. Подскажите пожалуйста - я сделал подсчет повторений по огроменной базе (благо теперь это занимает около секунды), результат (т.е. число повторов) выводится в тот же DBGrid... а хотелось бы вывести его, скажем в Edit - как это организовать?
(база в парадоксе)
привожу код -
ZZ:=LabeledEdit1.Text;
with Query1 do
begin
Close;
SQL.Text:="SELECT COUNT(запрос) AS êîë FROM "+TabName+" WHERE запрос = ""+ZZ+""";
Open;
end;
← →
Jeer © (2007-10-19 15:36) [1]ed.Text := qu.Fields[0].AsString;
← →
megabyte © (2007-10-19 15:38) [2]Не знаем, как в компонент edit вывести значение? Мде...
← →
Jeer © (2007-10-19 15:44) [3]megabyte © (19.10.07 15:38) [2]
А ты уже все знаешь ?
Тогда объясни:
Jeer © (04.10.07 18:01) [34]
function CountOne_4(x: byte): byte;
var y: LongWord;
begin
y := x;
y := y * $08040201;
y := y shr 3;
y := y and $11111111;
y := y * $11111111;
Result := y shr 28;
end;
из http://delphimaster.net/view/1-1191498439/
← →
megabyte © (2007-10-19 17:48) [4]
> Jeer © (19.10.07 15:44) [3]
это каким образом ко мне относится? :)
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2007.11.11;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.038 c