PDA

Просмотр полной версии : Delphi 7


ТП "Гибкое решение" Билайн
ТП "Гибкое решение" Билайн
Тарифы: МТС, Билайн, МегаФон
Выгодные непубличные тарифы МТС, Билайн, МегаФон, Безлимитный интернет ✅
fashion guide
08-10-2004, 21:24
Народ. Пытаюсь пользовать сабж. После VB мир кажется проклятым..

У меня по дельфи несколько вопросов:

1. Есть обьект Edit1, Label1 и Button1

Чтобы в label1 показать запись находящуюся в Edit1 я делаю так(по крайней мере получилось):

var
a : string;
begin
a := string(edit1.text);
label1.caption = a;

Можно ли это сделать еще проще? без всяких там string...

2. Как добавить запись в базу данных?

То что предлагаю ниже выдает ошибку.

var
a : string;
begin
a := string(edit1.text);

with form1.Query1 do begin
close;
sql.Clear;
sql.add('INSERT INTO ":bd:db_dogovor.db" (Name) VALUES ("'+string(edit1.text)+'")');
open;
end;
end;

Kolos
08-10-2004, 21:35
label1.caption:=edit1.text;
:D


несовсем понятно


зашли лучше проект на мыло я те мейби подскажу

!ЕГО ЗОВУТ РАААЛЬФ
08-10-2004, 21:56
А Я ВАЩЕ НИ ЧЁ НЕ ПОНЯЛ ! :D ЛУЧШЕ СКАЖИТЕ МНЕ ........................"Это изображение слишком большое. Максимальные размеры 60 на 60 пикселов. ------------- АНИМИРОВАНЫЙ АВАТОР МОЖНО УМЕНЬШИТЬ ????!" И КАК ......... НУ ЕСЛИ ВРЕМЯ БУДЕТ !

Kolos
08-10-2004, 22:03
время будит схади к врачу и отламай капс лок ;)

!ЕГО ЗОВУТ РАААЛЬФ
08-10-2004, 22:08
ОБЯЗАТЕЛЬНО ............... ;)

fashion guide
08-10-2004, 23:02
синтаксис хоть правильный?

Kolos
08-10-2004, 23:48
var
a : string;
begin
a := string(edit1.text); <-это правильный
label1.caption = a; <-это не правильный


в query надо при вставке, апдейте или удалении вызывать ExecSQL а, open когда только читаешь.
вообще поначалу используй луче table вместо query, и кстати не edit a dbeditы

MpaK69
09-10-2004, 15:07
чуть не обассался от темы :lol:

Kolos
09-10-2004, 20:12
ну ладно хоть не обассался :D