| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

[Warning] Unit2.pas(44): Unsafe type 'TBookmark' [D7, MSSQL]

KADAN ©   (2004-05-22 10:39:00) 

Драссе, господа, мож я совсем отупел, подскажите че от меня хотят...

var i:integer;
   bm:TBookmark;
   sql:string;
begin
 bm:=MainQuery.GetBookmark;
 SecondQuery.SQL.Clear;
 sql:='update tb_'+NowShown+' set kaf_id='+inttostr(TMenuItem(sender).Tag)+
 ' where id';
 if MainGrid.CheckCount>0 then begin
   sql:=sql+' in (';
   i:=0;
   while i<MainGrid.CheckCount-1 do begin
     sql:=sql+inttostr(MainGrid.CheckedItems[i])+', ';
     inc(i);
   end;
   sql:=sql+inttostr(MainGrid.CheckedItems[i])+')';
 end else sql:=sql+'='+MainQuery.fieldbyname('id').AsString;
 secondquery.sql.add(sql);
 SecondQuery.ExecSQL;
 MainQuery.Requery();
 if MainQuery.BookmarkValid(bm) then MainQuery.GotoBookmark(bm);
end;

чем же мой букмарк небезопасен?

---

KADAN   (2004-05-22 10:55:00) [1]

ок, так и сделаю :) сенкс

---

jack128   (2004-05-22 10:52:00) [2]

> Хочешь сказать, бояться нечего и нужно просто не обращать
> внимания
ну если ты не планируешь переписывать свою прогу под .NET, то можешь плевать на эти варнинги с высокой колокольни..Но лудше оключи их, чтоб глаза не мазолили - меня варнинги просто БЕСЯТ!! :-))

---

KADAN   (2004-05-22 10:48:00) [3]

> jack128
Хочешь сказать, бояться нечего и нужно просто не обращать внимания?

---

jack128   (2004-05-22 10:42:00) [4]

это предупреждение, что в Delphi.NET твой код не скомпилируется..Где то в опциях можно отключить warning'и по поводу несовместимости с .NET

---

Наверх