Школоло / Говнокод #1199 Ссылка на оригинал

0

  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
  9. 9
  10. 10
  11. 11
  12. 12
  13. 13
  14. 14
  15. 15
  16. 16
  17. 17
  18. 18
  19. 19
  20. 20
  21. 21
  22. 22
  23. 23
  24. 24
  25. 25
  26. 26
  27. 27
  28. 28
  29. 29
  30. 30
  31. 31
  32. 32
  33. 33
  34. 34
  35. 35
  36. 36
  37. 37
  38. 38
DBEdit.DataField:='';
  b:=0;
  Bookmark:=ADOQuery.GetBookmark;
  try
  if FLDFND.Text<>'' then
   begin
   if b=0 then
   begin
    try
    v:=ADOQuery.Fields[DBGrid.SelectedIndex].AsFloat;
    b:=1;
    except
    end;
   end;
   if b=0 then
   begin
    try
    v:=ADOQuery.Fields[DBGrid.SelectedIndex].AsString;
    b:=2;
    except
    end;
   end;
   if b=0 then
   begin
    try
    v:=ADOQuery.Fields[DBGrid.SelectedIndex].AsInteger;
    b:=3;
    except
    end;
   end;
   if b=0 then
   begin
    try
    v:=ADOQuery.Fields[DBGrid.SelectedIndex].AsDateTime;
    b:=4;
    except
    end;
   end;

Определял тип поля. Писал в пъяном бреду, ночью...

Запостил: guest guest, (Updated )

Комментарии (2) RSS

  • ava guest # Ссылка на оригинал 0

    Пфтудщт:
    ну норм) ctrl+c, ctrl+v)) нас этому в институте учат) Копировать, вставить,копировать, вставить - отчет готов)
    Ответить

Добавить комментарий

Я, guest, находясь в здравом уме и твердой памяти, торжественно заявляю:

    А не использовать ли нам bbcode?

    ↑
    8
    ↓