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

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

Помогите новичку со вставкой данных [D5, dBase, FoxPro, ]


RoadRunner ©   (2001-12-28 20:57:00) 

Привет всем, кто читает это собщение.
Помогите новичку.
Делаю локальную базу в формате DBase.Как вставить в поле типа Binary какой-нибудь файл(ну например exe),а потом получить его из этого поля.
Если не трудно, то маленький примерчик...
Спасибо всем кто ответит


RoadRunner   (2001-12-30 20:51:00) [1]

Спасибо всем


Red Alert   (2001-12-30 04:37:00) [2]

>SergVlad © (29.12.01 11:24
О блин...прошу прощения, с пьяну вопрос не разобрал..


Kirill   (2001-12-29 17:02:00) [3]

Я так и думал. :)


panov   (2001-12-29 16:21:00) [4]

Или, как указал Kirill, используем TTable.
Только без Edit и Cancel :-)


panov   (2001-12-29 16:20:00) [5]

TBlobField(Query1.FieldByName("fBlob")).SaveToFile("c:\myfile");


Kirill   (2001-12-29 16:16:00) [6]

Проведя аналогию с panov, получаем:
Table1.Edit;
TBlobField(Table1.FieldByName("NameBlobField")).SaveToFile("MyFileName");
Table1.Cancel;

//Хотя первая и последняя строчка все-же не нужны.


RoadRunner   (2001-12-29 16:04:00) [7]

>panov
Извините за глупй вопрос, а как считать из базы уже записанный файл?


panov   (2001-12-29 14:10:00) [8]

>ProfiUgl © (29.12.01 13:52)
>RoadRunner (28.12.01 20:57)
См. также: http://delphi.mastak.ru/cgi-bin/forum.pl?&n=1&id=1009621860&look=1


ProfiUgl   (2001-12-29 13:52:00) [9]

Query1.Close;
Query1.Sql.Clear;
Query1.Sql.Add("insert into table (field1,field2)");
Query1.Sql.Add("values ("1,""1"")"); //первое значение типа Integer, второе типа String
Query1.ExecSql;


panov   (2001-12-29 11:27:00) [10]

>Red Alert (29.12.01 10:55)
Не путай человека.

Table1.Insert;
TBlobField(Table1.FieldByName("NameBlobField")).LoadFromFile("MyFileName");
Table1.Post;


SergVlad   (2001-12-29 11:24:00) [11]

Здесь люди просят ответа, а не гадания на кофейной гуще.
Тем более - правильных ответов.


Red Alert   (2001-12-29 10:55:00) [12]

кажется функция что,то наподобе
Table1.FieldName("Name").String := "Sample";
и
S:=Table1.FieldName("Name").String;
Точно не помню надо посмотреть в исходниках, базами не за-нимался давно.. я больше системщик
Завтра точно скажу, но посмотри в хелпе кажется функция именно так называется


Наверх

Титульная страница Поиск, карта сайта Написать письмо