Форум: "Начинающим";
Текущий архив: 2006.04.02;
Скачать: [xml.tar.bz2];
Вниз
Помогите найти ошибку в тексте программы Найти похожие ветки
← →
Alex Korukin (2006-03-15 06:30) [0]
procedure TForm310119897012005.Table1TeacherChange(Sender: TField);
begin
if flag=false then begin // Если не импортирует из файла
Query11.Active:=false;
Query11.SQL.Text:="SELECT Teacher, Teachers."Union", Section FROM "teachers.DB" Teachers Where Teacher=""+Sender.Text+""";
Query11.ExecSQL;
Query11.Active:=true;
flag2:=true;
DBGrid1.Columns[10].PickList.Clear;
while not Query11.Eof do Begin
DBGrid1.Columns[10].PickList.Add(Query11Union.Text);
Query11.Next;
end;
Table1Union.Text:="";
Query11.Close;
end;
end;
В строке Table1Union.Text:=""; выдаёт "Stack owerflow". Не знаю как лечть...
← →
atruhin © (2006-03-15 06:56) [1]>>Table1Union.Text:="";
А что это вообще такое? У TTable вроде нет свойства Text.
>> Teacher=""+Sender.Text+"""
Вот здесь тоже будет ошибка. Можешь убедиться введя в Sender.Text строку с двойными кавычками. ИСПОЛЬЗУЙ параметры.
← →
Alex Korukin (2006-03-15 07:25) [2]
> >>Table1Union.Text:="";
> А что это вообще такое? У TTable вроде нет свойства Text.
>
У TTable - нет а у поля Union - есть!
> >> Teacher=""+Sender.Text+"""
> Вот здесь тоже будет ошибка. Можешь убедиться введя в Sender.
> Text строку с двойными кавычками. ИСПОЛЬЗУЙ параметры.
Здесь тоже нету ошибки... это 100%. может только в грамотности и правильности подхода... А про пораметры ты прав... только я когда начинал это всё делать про них ещё не знал)))
← →
atruhin © (2006-03-15 07:44) [3]>>У TTable - нет а у поля Union - есть!
Не понял из текста, что это за объект. Возможно в Table1 нет записей. Во вторых где у тебя Table1.Edit; Table1.Post; ?
>>Здесь тоже нету ошибки... это 100%.
Здесь есть 100% :). Я написал как проверить.
← →
Плохиш © (2006-03-15 11:17) [4]> procedure TForm310119897012005.Table1TeacherChange(Sender:
> TField);
> Table1Union.Text:="";
Советую использовать встроенный в делфи отладчик, а не форум.
PS. А это чёй-то такое?Query11.ExecSQL;
Query11.Active:=true;
Надо бы почитать чего, перед топтанием кнопок.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.04.02;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.05 c
