проблема c DataSource.DataChange [D5, dBase, FoxPro]
Страницы:
<
1
2
>
Roman_Tutov@mail.ru © (2002-03-28 10:48:00)
procedure TForm1.DataSource3DataChange(Sender: TObject; Field:
TField);
var
Result : integer;
begin
if Table1.Active=true then
Result:=0;
Table1.First;
while not Table1.Eof do begin
Result:=(Result+(Table1.FieldByName("TSENA").asInteger)*(Table1.FieldByName("KOLVO").asInteger));
Table1.Next;
end;
Form1.Frame81.Frame91.Label2.Caption:=(FloattoSTr(Result));
end;
end.
почему при исполнения этого текста я получаю
"Access violation " ?
Этот-же текст привязанный к кнопке работает ?
Бага ?
Lusha (2002-03-28 11:13:00) [21]
А DataSource3 случаем не к Table1 привязана? :)
Страницы:
<
1
2
>
Наверх 
ЧАТ |
Орешник |
|
