Автор OSpa oSpa задал вопрос в разделе Другие языки и технологии
Как сделать счётчик в базе данных в Delphi? и получил лучший ответ
Ответ от Алексей Кузьминов[гуру]
with ADOQuery1 do begin
Close;
SQL.Clear;
SQL.Add('SELECT count(*) AS total_count FROM Таблица1');
Open;
Edit1.Text:=FieldByName('total_count').AsString;
end;
Если нужны не все, то измените запрос.
ЗЫ
Есть тонкое различие между теми, которые показаны в таблице и теми, которые есть в базе (полученными по такому запросу). Эти 2 числа могут быть разными. Это зависит от многих факторов, типа СУБД, кеширования, транзакций и т. п.
Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с ответами на Ваш вопрос: Как сделать счётчик в базе данных в Delphi?
Проверка Edit в Delphi
Доброго времени суток.
Трудно не зная тонкостей задачи дать вменяемый ответ. Попробую в
подробнее...
Delphi как сделать ввод только чисел с точкой ?
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if not(key in
подробнее...
Как запретить ввод букв во всех Edit-ах в Delphi.
А что мешает тебе назначить событиям всех edit-ов один и тот же обработчик? Он у тебя, как я вижу,
подробнее...
Как программно включить и выключить событие OnChange в delphi 6 ?
короче, на примере Edit, берешь компонент в котором не прописано код OnChange прописываешь там
подробнее...
Дельфи. Запись из edit в файл
Только так:
var
T : Text;
procedure Save(Edit);
begin
WriteLn(T,
подробнее...
Ответ от 3 ответа[гуру]
Привет! Вот еще темы с похожими вопросами:
Нужно записать if в delphi. if Edit1.Text <> \' \' and Edit2.Text <> \' \' then Что сдесь не правильно?
попробуйте так
if (Edit1.Text <> \' \') and (Edit2.Text <> \' \') then
или так
подробнее...
Delphi!? Edit1.text, как сделать событие после ввода, тобишь после нажатия <enter>! (паясню в скринах)?
Нужно добавить обработчик события OnKeyDown для TEdit и прописать в него примерно следующий код:
подробнее...
спросили в User ba east User delphi
Delphi, как пользоваться функцией InputBox?
Так как написано в стандартной справке.
А справка писана не для Пушкина, а для тебя.
Delphi, как пользоваться функцией InputBox?
Так как написано в стандартной справке.
А справка писана не для Пушкина, а для тебя.
спросили в Time Warner
Delphi7 - Подскажите как ограничить количество цифр в Edit?
Специально сейчас проверил. Выставил Edit1.MaxLength:=5 и попробовал ввести что-либо. Хоть с
подробнее...
Delphi7 - Подскажите как ограничить количество цифр в Edit?
Специально сейчас проверил. Выставил Edit1.MaxLength:=5 и попробовал ввести что-либо. Хоть с
подробнее...
Delphi. Пароль в виде звёздочек
В свойствах Edit найди параметр PasswordChar по умолчанию там #0 измени на * или № или что
подробнее...
Pos , Copy delphi
грузи строку в стринглист
каждый элемент стринглиста преобразовывай в вещ. число, вери
подробнее...