Вниз
Скачать: CL | DM;

Поиск максимального значения +1   Найти похожие ветки 

← →
Шакал ©   (2007-05-31 15:59) [0]

Помогите плиз
Нужно в поле эдит вставить цифру на 1 больше максимальной столбце
бд ацесс
пробовал так
edit1.text:=dat.ADOQ.SQL.Add("select max (id) from kadry");
не выходит :(


← →
Desdechado ©   (2007-05-31 16:04) [1]

> пробовал так
А в песочнице совочком?

Хоть бы справку почитал, что ли, что делают эти методы.
И демок полно в "C:\Program Files\Borland\Delphi7\Demos\Db\"


← →
clickmaker ©   (2007-05-31 16:04) [2]

а в акцессе разве нету полей типа "счетчик" или autoincrement?


← →
Loginov Dmitry ©   (2007-05-31 16:08) [3]

> не выходит


тужся больше. Глядишь и выйдет )))


← →
Плохиш ©   (2007-05-31 16:08) [4]


> Шакал ©   (31.05.07 15:59)  

Ну вот, ещё один решил чтение книг форумом заменить...


← →
Шакал ©   (2007-05-31 16:10) [5]


> а в акцессе разве нету полей типа "счетчик" или autoincrement?

в акцессе есть...но в таблицы можно только один счетчик ставить, а он у мну уже для другого использован


← →
Сергей М. ©   (2007-05-31 16:10) [6]


> Шакал ©   (31.05.07 15:59)


> не выходит


Вазелином смажь


← →
DiamondShark ©   (2007-05-31 16:13) [7]


> а он у мну уже для другого использован

чую дурной запах нехорошей постановки


← →
Шакал ©   (2007-05-31 16:13) [8]


> И демок полно в "C:\Program Files\Borland\Delphi7\Demos\Db\

там все папки пустые :( видать дельфя некашерная...


← →
Сергей М. ©   (2007-05-31 16:14) [9]

В сад.


← →
Elen ©   (2007-05-31 16:14) [10]


> edit1.text:=dat.ADOQ.SQL.Add("select max (id) from kadry");

Интересно, это весь код или... Ато вообще-то его кроме прописывания еще и выполнить надо.


← →
clickmaker ©   (2007-05-31 16:15) [11]


> edit1.text:=dat.ADOQ.SQL.Add("select max (id) from kadry");

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


← →
Шакал ©   (2007-05-31 16:16) [12]


> Ато вообще-то его кроме прописывания еще и выполнить надо.

id.Value:=dat.ADOQ.SQL.Add("select max (id) from kadry");
dat.ADOQ.ExecSQL;


← →
Правильный Вася   (2007-05-31 16:18) [13]

методом трех П ?
пол - потолок - палец?


← →
Плохиш ©   (2007-05-31 16:18) [14]


> Elen ©   (31.05.07 16:14) [10]

> clickmaker ©   (31.05.07 16:15) [11]

Серьёзные подтянулись... Пацанчик просто всех развлекает :-D


← →
clickmaker ©   (2007-05-31 16:19) [15]


> [14] Плохиш ©   (31.05.07 16:18)

а что, серьезные - так уж и развлечься нельзя? )


← →
Сергей М. ©   (2007-05-31 16:21) [16]


> Пацанчик просто всех развлекает


У него "не выходит" !

Это уже не "развлечение"...

Больно ведь)

А delphimaster.ru - это, как известно, служба "911"


← →
Шакал ©   (2007-05-31 16:25) [17]


> Пацанчик просто всех развлекает :-D

ага и контрольная шутка
edit1.text:=dat.ADOQ.SQL.Add("select max (id) from kadry")+1;
:-!


← →
Elen ©   (2007-05-31 16:26) [18]


> Плохиш ©   (31.05.07 16:18) [14]

Просто интересно стало... )

> Шакал ©   (31.05.07 16:16) [12]

И это все?


← →
DrAndrey ©   (2007-05-31 16:27) [19]

> Пацанчик просто всех развлекает :-D
Нет, он издевается.


← →
Шакал ©   (2007-05-31 16:28) [20]


> Нет, он издевается.

однозначно нет....думайте что хотите, ушел в библиотеку книжку читать


← →
Сергей М. ©   (2007-05-31 16:29) [21]


> ага и контрольная шутка


Ага, шутка некомпилируемая в принципе


← →
Шакал ©   (2007-05-31 16:30) [22]


> Ага, шутка некомпилируемая в принципе
>

нифига, отлично компилируется и даже 1 вставляет в этит поле


← →
Сергей М. ©   (2007-05-31 16:30) [23]


> ушел в библиотеку книжку читать


Неужели про "Репку" ?!


← →
Шакал ©   (2007-05-31 16:31) [24]


> Неужели про "Репку" ?!

ну не про дельфиже....


← →
Elen ©   (2007-05-31 16:34) [25]


> нифига, отлично компилируется и даже 1 вставляет в этит
> поле

Круто.


← →
DrAndrey ©   (2007-05-31 16:34) [26]

ADOCommand.Execute - это фунция? Возвращает что?


← →
Сергей М. ©   (2007-05-31 16:35) [27]

Господи, ниспошли клизму рабу твоему, Шакалу (c), бо не ведает он чем полезным ему заняться !


← →
Плохиш ©   (2007-05-31 16:35) [28]


> DrAndrey ©   (31.05.07 16:34) [26]
> ADOCommand.Execute - это фунция? Возвращает что?

А в справке что написано?


← →
Плохиш ©   (2007-05-31 16:37) [29]


> Сергей М. ©   (31.05.07 16:35) [27]

Да ладно, сделай 10 минут перерыва ;-)


← →
Шакал ©   (2007-05-31 16:39) [30]


> ADOCommand.Execute

ты где вобще это взял???


← →
Шакал ©   (2007-05-31 16:40) [31]


> Сергей М.

я дельфи изучаю 2 недели тока, многого незнаю...нечего так набрасыватся.блин


← →
Сергей М. ©   (2007-05-31 16:42) [32]


> Шакал ©   (31.05.07 16:40) [31]



> изучаю 2 недели

А врать при этом научился гораздо раньше)


← →
Плохиш ©   (2007-05-31 16:42) [33]


> я дельфи изучаю

Афигенная шутка :-))


← →
DrAndrey ©   (2007-05-31 16:43) [34]

> ADOCommand.Execute

>ты где вобще это взял???

Я подсказываю, а ты действительно издеваешся!
Выполни запрос, получи рекордсет, обратись к нужному полю, получи своё max (id) и прилепи к нему единицу.


← →
Шакал ©   (2007-05-31 16:43) [35]

Конференция для начинающих, а также для тех, кому сложно объяснить чего он хочет. Просьба к участникам быть взаимовежливыми, профессионалам отдельная просьба - быть снисходительными.

пошли вы сами....


← →
Elen ©   (2007-05-31 16:44) [36]


> Шакал ©   (31.05.07 16:39) [30]

Я одного не пойму с чего ты взял что метод Add вернет тебе результ? Это ж тебе не Фокспро.
Вот цитата из справки :

Adds a string at the end of the list.

function Add(const S: string): Integer; virtual;

Description

Call Add to add a string to the end of the list. Add returns the index of the new string.


Так что оно хоть и компилится но выдает тебе количество строк твоей sql команды. А то что ты хош делается совсем по другому.


← →
Сергей М. ©   (2007-05-31 16:47) [37]


> Шакал ©   (31.05.07 16:43) [35]


Прекрати врать и демонстрировать идиотский доморощенный сленг - будет тебе, как и обещано, "снисходительность".


← →
Шакал ©   (2007-05-31 16:48) [38]


> Прекрати врать

идея вру?


← →
Плохиш ©   (2007-05-31 16:48) [39]


> Шакал ©   (31.05.07 16:43) [35]
> Конференция для начинающих

Это не для тебя конференция.


← →
Шакал ©   (2007-05-31 16:50) [40]


> Это не для тебя конференция.

а куда мне в профессионалы податься???


← →
Сергей М. ©   (2007-05-31 16:51) [41]


> идея вру?
>


итам где приводишь заведомо некомпилируемый код.


← →
Шакал ©   (2007-05-31 16:52) [42]

все комилируется...проверь...
вот корректность выполнения, это да.....


← →
Сергей М. ©   (2007-05-31 16:52) [43]


> куда мне в профессионалы податься?


Появится КетмАрь - он тебе подскажет куда)


← →
Сергей М. ©   (2007-05-31 16:53) [44]


> все комилируется...проверь


Все. Уймись.


← →
Шакал ©   (2007-05-31 16:55) [45]

да и ладно....обосрали блин по всякому...впитал..спасибо....
и без вас разберусь....


← →
DrAndrey ©   (2007-05-31 16:55) [46]

Уважаемый товарищ Шакал. Для решения проблемы Вам необходимо не только написать текст SQL-запроса, но и выполнить его, получив результирующий набор данных, обратитесь к fields[0] и получите его значение (value), в последствии Вы можете прибавить к нему 1, таким образом получите "цифру на 1 больше максимальной столбце
бд ацесс..."


← →
Сергей М. ©   (2007-05-31 16:56) [47]


> обосрали блин по всякому


мы старались)


← →
Правильный Вася   (2007-05-31 17:17) [48]


> > обосрали блин по всякому

не подставляйся
и не упорствуй в заблуждениях


← →
Anatoly Podgoretsky ©   (2007-05-31 21:47) [49]

> Шакал  (31.05.2007 16:43:35)  [35]

Конференция для начинающих!!!


← →
Anatoly Podgoretsky ©   (2007-05-31 21:52) [50]

> Сергей М.  (31.05.2007 16:35:27)  [27]

Кетмар скажет


← →
Шакал ©   (2007-06-01 09:29) [51]

Бин люди...всю ночь читал книги, много думал ;)....
А РЕШЕНИЯ ТАК И НЕ НАШЁЛ :-(
нашёл функцию succ - хорошая функция...а вот как макс значение найти так и ненашел....


← →
Loginov Dmitry ©   (2007-06-01 09:40) [52]

> нашёл функцию succ - хорошая функция...


Так ты и учишь Pascal: эта функция харошая - пойдет. Эта функция не подойдет - она плахая.


← →
Шакал ©   (2007-06-01 09:43) [53]


> эта функция харошая - пойдет. Эта функция не подойдет -
> она плахая.

Это ты щас с кем разговаривал???


← →
Сергей М. ©   (2007-06-01 09:44) [54]


> РЕШЕНИЯ ТАК И НЕ НАШЁЛ


А оно между тем прямо перед носом - сначала нужно выполнить свормированный тобой SQL-запрос, и только после его выполнения получать результаты.

У тебя где в коде хоть что-либо напоминающее попытку запуска запроса на выполнение (Open, Active) ? Нет этого) .. Ну так а что же ты тогда хочешь, если запрос твой не выполнен ?


← →
SlymRO ©   (2007-06-01 09:45) [55]

Удалено модератором


← →
Шакал ©   (2007-06-01 09:54) [56]

dat.ADOQ.SQL.Clear;
i:=dat.ADOQ.SQL.Add("select max(id) from kadry");
dat.ADOQ.ExecSQL;
id.Value:=succ(i);
dat.ADOQ.SQL.Clear;
dat.ADOQ.SQL.add("select * from kadry");
dat.ADOQ.open;

Вот полностью весь код...подставляется значение 1...т.е. запрос возвращает 0 :(


← →
SlymRO ©   (2007-06-01 09:59) [57]

ААААА!! вот кто виндус напесал! бей его!
dat.ADOQ.SQL.Clear;
dat.ADOQ.SQL.Add("select max(id) from kadry");
dat.ADOQ.Open;
id.Value:=dat.ADOQ.Fielsd[0].Value+1;


← →
Loginov Dmitry ©   (2007-06-01 10:01) [58]

Может, всеже книжку какую почитаешь? Ну вот что ты этим хочешь добиться:
i:=dat.ADOQ.SQL.Add("select max(id) from kadry");
?
В пустой список TStrings будет добавлена строка, и функция Add вернет ее индекс 0. Но какое отношение это имеет к базе данных?


← →
Сергей М. ©   (2007-06-01 10:07) [59]


> Шакал ©   (01.06.07 09:54) [56]


with dat.ADOQ do begin
 SQL.Text := "select max(id)+1 from kadry";
 Open;
 id.Value := Fields[0].Value;
end;


← →
SlymRO ©   (2007-06-01 10:08) [60]

try
:Цыкл
Книга.Open;
try
 while not IQ>0 do
   Книга.Read;
except
 Книга.Перевернуть;
 Goto Цыкл;
end;  
except
 on MozgNotFound: self.УбитьсяАпСтену;
end;


← →
Loginov Dmitry ©   (2007-06-01 10:19) [61]

Книга.Перевернуть; не мешало бы взять в отдельный защищенный блок.


← →
ANB ©   (2007-06-01 10:20) [62]


> "select max(id) from kadry"

Некузяво. Надо сначала таблицу залочить иначе в сетевом режиме 2 юзера смогут получить одинковое ID + 1


← →
Шакал ©   (2007-06-01 10:29) [63]


> with dat.ADOQ do begin
>  SQL.Text := "select max(id)+1 from kadry";
>  Open;
>  id.Value := Fields[0].Value;
> end;

Вы будете смеяться, но ему поле id не найти....


← →
SlymRO ©   (2007-06-01 10:37) [64]

DROP TABLE kadry;


← →
Сергей М. ©   (2007-06-01 10:42) [65]


> ему поле id не найти


Кому "ему" ?

Что за объект id ? Откуда он у тебя начал фигурировать в программе ?


← →
Шакал ©   (2007-06-01 10:50) [66]

Запросу :)
ID это числовое поле в таблице kadry


← →
Loginov Dmitry ©   (2007-06-01 11:02) [67]

> Вы будете смеяться, но ему поле id не найти....


В [60] сказано, что нужно делать.


← →
Сергей М. ©   (2007-06-01 11:06) [68]


> Шакал ©   (01.06.07 10:50) [66]


А причем здесь "поле эдит" ?


← →
Шакал ©   (2007-06-01 11:25) [69]


> А причем здесь "поле эдит" ?

ну я ща вместо эдит RXspinedit вставил


← →
Шакал ©   (2007-06-01 11:46) [70]


> DROP TABLE kadry;

чё ты за код написал, у меня теперь все время пишет table kadry not found
:^(


← →
Loginov Dmitry ©   (2007-06-01 11:56) [71]

Сделай Format C: и оно вернется


← →
Сергей М. ©   (2007-06-01 11:57) [72]


> RXspinedit вставил


Куда "вставил" ?

Как RXspinedit связан с объектом id ?


← →
Шакал ©   (2007-06-01 11:58) [73]


> Сделай Format C: и оно вернется

забыл сказать что надо под дос загрузится :-Ь


← →
Шакал ©   (2007-06-01 11:59) [74]


> Куда "вставил" ?
>
> Как RXspinedit связан с объектом id ?
>

на форму....
значение RXspinedit заносится в таблицe kadry в поле id


← →
Сергей М. ©   (2007-06-01 12:02) [75]


> значение RXspinedit заносится в таблицe kadry в поле id


Ну так прежде чем значение из RXspinedit будет куда-то заноситься, оно сначала должно там оказаться каким-то образом !

Вот и заноси туда это значение:

RXspinedit.Value := Fields[0].Value;

Неужто это так сложно дотумкать самостоятельно ?


← →
Правильный Вася   (2007-06-01 12:08) [76]

одно из двух:
1. банальный развод
2. банальный тормоз
оба варианта бесперспективны, зачем ведетесь


← →
Шакал ©   (2007-06-01 12:11) [77]


> RXspinedit.Value := Fields[0].Value;

id.value:=Fields[0].Value;

тоже самое...имя у RXspinedit = id


← →
Шакал ©   (2007-06-01 12:13) [78]


> одно из двух:
> 1. банальный развод
> 2. банальный тормоз
> оба варианта бесперспективны, зачем ведетесь

Ну конечно, Вы участвовали в шоу разведи мастеров дельфи, всем спасибо за участие :-D

А серьезно...ну не получается у меня.....попросил помощи...а вы головойапстену....


← →
Сергей М. ©   (2007-06-01 12:20) [79]


> тоже самое


Что "тоже самое" ?)


← →
Шакал ©   (2007-06-01 12:26) [80]


> RXspinedit.Value := Fields[0].Value;
>
> id.value:=Fields[0].Value;

имя объекта RXspinedit - id


← →
Плохиш ©   (2007-06-01 12:29) [81]


> Шакал ©   (01.06.07 12:26) [80]

Скажи, чё тебе от нас надо-то?


← →
Сергей М. ©   (2007-06-01 12:31) [82]


> имя объекта RXspinedit - id
>


Это мы уже поняли)

Ну и ?


← →
Шакал ©   (2007-06-01 12:36) [83]

написал так
edit1.text:=inttostr(dat.ADOQ.Fields[0].Value);
ругается
could not convert variant of type (Null) into type (integer)


← →
Loginov Dmitry ©   (2007-06-01 12:40) [84]

edit1.text := dat.ADOQ.Field[0].AsString


← →
Плохиш ©   (2007-06-01 12:40) [85]


> could not convert variant of type (Null) into type (integer)

Таблица пустая.


← →
sniknik ©   (2007-06-01 12:44) [86]

> Таблица пустая.
или поле


← →
Сергей М. ©   (2007-06-01 12:44) [87]

Ну ругается, и что ?

Значит dat.ADOQ.Fields[0].Value действительно равно Null.


← →
boriskb ©   (2007-06-01 12:46) [88]


> Шакал ©


Я так автомобили чиню :)

по балону пнул - не помогло, бибикнул - тоже не заводится :))


← →
Сергей М. ©   (2007-06-01 12:46) [89]


> Таблица пустая


Таблица непустая, иначе при обращении к заначению поля возникло бы исключение а-ля "нет текущей записи"


← →
Шакал ©   (2007-06-01 12:48) [90]

edit1.Text:=dat.ADOQ.Fields[0].AsString;
пустое поле edit получилось


← →
clickmaker ©   (2007-06-01 12:49) [91]


>  [89] Сергей М. ©   (01.06.07 12:46)

насколько я знаю, max() может вернуть null только, если не нашел ни одной записи по условию или таблица и вправду пустая


← →
boriskb ©   (2007-06-01 12:50) [92]


> пустое поле edit получилось


Ну дык..
Балона то 4 - не по всем пинал :)


← →
Плохиш ©   (2007-06-01 12:52) [93]


> Сергей М. ©   (01.06.07 12:46) [89]
>
> > Таблица пустая
>
>
> Таблица непустая, иначе при обращении к заначению поля возникло
> бы исключение а-ля "нет текущей записи"

У него вроде запрос "select max(id)...", он всегда возвращает минимум одну запись... или я уже нить ветки проспал :-)


← →
Шакал ©   (2007-06-01 12:53) [94]


> насколько я знаю, max() может вернуть null только, если
> не нашел ни одной записи по условию или таблица и вправду
> пустая

в таблице две записи со значения ми id 1,  2


← →
Сергей М. ©   (2007-06-01 12:54) [95]


> пустое поле edit получилось


И ?

Выводы-то сделал ?


← →
Сергей М. ©   (2007-06-01 12:55) [96]


> в таблице две записи со значения ми id 1,  2


Врешь.

При этих условиях max(id) обязательно вернет 2, но никак не Null


← →
Правильный Вася   (2007-06-01 12:56) [97]


> .попросил помощи...а вы головойапстену....

помощи просят, когда все умеешь, но не хватает некоторых нюансов
и просят направления, где почитать
а ты читать не желаешь, хотя еще в первых постах тебя отправили читать справку по компонентам, которые ты используешь методом НЕнаучного тыка

отсюда логичный вывод: или не умеешь думать, или порезвиться пришел
оба случая клинические


← →
Шакал ©   (2007-06-01 12:57) [98]


> Выводы-то сделал ?

не вернулся результат запроса?


← →
clickmaker ©   (2007-06-01 12:57) [99]


> в таблице две записи со значения ми id 1,  2

такие варианты
1. не в той таблице
2. не в той базе
3. ты что-то неправильно делаешь
4. ты просто прикалываешься тут над всеми

выбирай


← →
Сергей М. ©   (2007-06-01 13:00) [100]


> не вернулся результат запроса?


Ага, вероломству запроса нет предела - ушел, обещал, понимаешь ли, вернуться,  и не вернулся... Вот ведь зараза какая !)

Если бы он не вернулся, ты бы сейчас хныкал об другом, мол, че за ошибка такая-то)...


← →
sniknik ©   (2007-06-01 13:09) [101]

> насколько я знаю, max() может вернуть null только, если не нашел ни одной записи по условию или таблица и вправду пустая
наверняка не все движки похоже работают но jet еще возвращает null если значение поля (все) = null.

> 4. ты просто прикалываешься тут над всеми
самый вероятный вариант ИМХО. "включил дурочку". а после скажет - "ничего вы не понимаете, помочь не можете, уйду я от вас. а еще мастера!"


← →
Плохиш ©   (2007-06-01 13:11) [102]


> а после скажет - "ничего вы не понимаете, помочь не можете,
>  уйду я от вас. а еще мастера!"

Когда ж этот "после" придёт?


← →
sniknik ©   (2007-06-01 13:12) [103]

да быстрее бы уж... заждались ;о).


← →
Шакал ©   (2007-06-01 15:26) [104]

Ну вот скажите мне, что не правильно....

dat.ADOQ.Close;
dat.ADOQ.SQL.Clear;
dat.ADOQ.SQL.Add("select max(id) from kadry");
dat.ADOQ.ExecSQL;
edit1.Text:=dat.ADOQ.Fields[0].AsString;
dat.ADOQ.Close;
dat.ADOQ.SQL.Clear;
dat.ADOQ.sql.Add("select * from kadry");
dat.ADOQ.open;

ведь вот эта строка "dat.ADOQ.sql.Add("select * from kadry");" - в дбгриде отображается корректно, все записи, включая id...


← →
Sergey13 ©   (2007-06-01 15:31) [105]

> [104] Шакал ©   (01.06.07 15:26)
> Ну вот скажите мне, что не правильно....

Ну тогда объясни, почему у тебя в одном случае ExecSQL, а в другом open?


← →
Сергей М. ©   (2007-06-01 15:32) [106]

Сказка, блин, про белого бычка)

Ну какого лешего ты опять влупил ExecSQL ?

Ты и вправду придурок или совсем плох здоровьем ?)


← →
Шакал ©   (2007-06-01 15:35) [107]

dat.ADOQ.Close;
dat.ADOQ.SQL.Clear;
dat.ADOQ.SQL.Add("select max(id) from kadry");
dat.ADOQ.open;
edit1.Text:=dat.ADOQ.Fields[0].AsString;
dat.ADOQ.Close;
dat.ADOQ.SQL.Clear;
dat.ADOQ.sql.Add("select * from kadry");
dat.ADOQ.open;

Если там ставлю open Пишет что поле ID не найдено
???


← →
Сергей М. ©   (2007-06-01 15:37) [108]


> Пишет что поле ID не найдено


Раз пишет, значит так и есть.


← →
Шакал ©   (2007-06-01 15:38) [109]


> Раз пишет, значит так и есть.

Но этот запрос dat.ADOQ.sql.Add("select * from kadry"); выводит данные в дбгрид..и там поле ID отображается!!!!!!!!!!!!!!!!!!!!


← →
k2 ©   (2007-06-01 15:41) [110]

а ты попробуй сделать select id, ...


← →
Шакал ©   (2007-06-01 15:45) [111]


> а ты попробуй сделать select id, ...

хм...написал так
dat.ADOQ.Close;
dat.ADOQ.SQL.Clear;
dat.ADOQ.sql.Add("select id from kadry");
dat.ADOQ.open;

выдал ошибку что не найдено следующее поле в таблице!!!!!!!!!!!!!!!!!!!


← →
k2 ©   (2007-06-01 15:47) [112]

и о чем это нам говорит? :)


← →
Сергей М. ©   (2007-06-01 15:47) [113]


> выдал ошибку что не найдено следующее поле в таблице


Раз выдал, значит его там действительно нет.

вариант №2 - ты просто придурок, и тебе - в очередь за рецептом к Кетмарю)


← →
Шакал ©   (2007-06-01 15:47) [114]

dat.ADOQ.sql.Add("select id, field2 from kadry");

Ошибка что не найдено следующее поле..и т.д.


← →
Шакал ©   (2007-06-01 15:49) [115]

А написал в запрос все поля, показал в грид все нормально


← →
Sergey13 ©   (2007-06-01 15:49) [116]

> [111] Шакал ©   (01.06.07 15:45)

А если не экономить на компонентах и добавить еще пару квериков.
dat.ADOQ1.Close;
dat.ADOQ1.SQL.Text:="select max(id) from kadry";
dat.ADOQ1.open;
edit1.Text:=dat.ADOQ1.Fields[0].AsString;

dat.ADOQ2.Close;
dat.ADOQ2.sql.Text:="select * from kadry";
dat.ADOQ2.open;


← →
Шакал ©   (2007-06-01 15:49) [117]


> Сергей М.

я тебя не оскорблял..зачем ты так


← →
Сергей М. ©   (2007-06-01 15:52) [118]


> Шакал ©   (01.06.07 15:49) [117]


А врать с твоей стороны - не оскорбление ?)


> dat.ADOQ.sql.Add("select id, field2 from kadry");
>
> Ошибка что не найдено следующее поле..и т.д.


Выполнение ЭТОЙ строчки НЕ может привести к ЭТОЙ ошибке.
Ври да не завирайся !


← →
Шакал ©   (2007-06-01 15:53) [119]


> Выполнение ЭТОЙ строчки НЕ может привести к ЭТОЙ ошибке.
>
> Ври да не завирайся !

я клянусь он так пишет


← →
Сергей М. ©   (2007-06-01 15:55) [120]


> он так пишет


Кто "он" ?

Что отладчик говорит при пошаговой трассировке ?


← →
Шакал ©   (2007-06-01 15:57) [121]

Блин....а через новый квери пошло...!!!!!8)
dat.ADOQueryID.Close;
dat.ADOQueryID.SQL.Clear;
dat.ADOQueryID.SQL.Add("select max(id)+1 from kadry");
dat.ADOQueryID.open;
edit1.Text:=dat.ADOQueryID.Fields[0].AsString;

Всем огромное спасибо, хоть Вы меня и оскорбляли, но действительно сильно помогли, я 3 дня над этим бился....а дело как всегда на 3 мин было....


← →
Плохиш ©   (2007-06-01 15:59) [122]


> Шакал ©   (01.06.07 15:53) [119]

В редакторе формы кликаешь на своём кверике дважды мышакана и в открывшемся окне удалёешь к чёртовой матери все поля, которые ты туда по своему скуподумию нафигачил...


← →
Шакал ©   (2007-06-01 16:01) [123]


> Плохиш

у меня через этот редактор fields настроины поля которые должен показывать дбгрид


← →
Плохиш ©   (2007-06-01 16:03) [124]

Я бы ему и метлу не доверил...


← →
Сергей М. ©   (2007-06-01 16:04) [125]


> хоть Вы меня и оскорбляли, но действительно сильно помогли


Ну пока дыню тебе в очко не закатишь, ты ж не пошевелишься ?)


> я 3 дня над этим бился


Бедняга)

Бился, блин, бился Иван-Царевич с ворогом несметным 3 дня и 3 ночи, и не знал он, что победить сие полчище можно было в 3 секунды, имея на вооружении не меч и кайло-кувадлу, а гораздо более мощно-волшебное оружие - меч-кладенец, известный также как "встроенный в Делфи Отладчик"

))


← →
McSimm_ ©   (2007-06-01 16:05) [126]

Чтение ветки оставило отвратительные впечатления.


> Шакал ©

Это не в твой адрес...


← →
Шакал ©   (2007-06-01 16:06) [127]

Плохишь ща я скомпилирую прогу (она правда еще не доканца доделана) ссылку дам посмотришь как мастер....


← →
Шакал ©   (2007-06-01 16:21) [128]

http://porhovpost.jino-net.ru/1/prg.rar

Моя первая программа...:) так что не судите строго....
и надо будет дописать если упомянутая выше таблица пустая, что бы 1 вставлял.....


← →
SlymRO ©   (2007-06-04 10:43) [129]

Кликнул на ссылку тока чтобы посмотреть размер... Ну ты блондин одназначна или всех остальных на них считаешь... низнакомый экзек качать сирано что поднимать мыло в бане в кругу низнакомых людей



Страницы: 1 2 3 4 вся ветка

Скачать: CL | DM;



Память: 0.75 MB
Время: 0.02 c
15-1180685196
PARUS
2007-06-01 12:06
2007.07.01
Драйвер под Линукс


2-1181037181
Изя
2007-06-05 13:53
2007.07.01
чтото вида PageControl


15-1180717937
@!!ex
2007-06-01 21:12
2007.07.01
Эффект slo-mo для звука.


15-1180528252
homm
2007-05-30 16:30
2007.07.01
DOS атака


1-1178010795
Tack
2007-05-01 13:13
2007.07.01
Как получить PlainText из RTF-строки, не используя TRichEdit?




   Наверх