Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 20.03.2009, 22:56   #1
eldar
Форумчанин
 
Аватар для eldar
 
Регистрация: 04.08.2008
Сообщений: 154
Вопрос delphi+access

Задача состоит в том что есть база данных access там таблица в таблице одно поле допустим url
есть программа написана на delphi
код:
Код:
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs,Jpeg, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient,
IdHTTP, StdCtrls, ExtCtrls, ScktComp, IdCookieManager;

type
  TForm1 = class(TForm)
    IdHTTP1: TIdHTTP;
    Button2: TButton;
    Edit1: TEdit;
    Edit2: TEdit;
    Edit3: TEdit;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Edit4: TEdit;
    Edit5: TEdit;
    Edit6: TEdit;
    Label4: TLabel;
    Label5: TLabel;
    Label6: TLabel;
    Button1: TButton;
    Image1: TImage;
    Button3: TButton;
    Edit7: TEdit;
    Label7: TLabel;
    
    procedure Button2Click(Sender: TObject);
   
 
  
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}



procedure TForm1.Button2Click(Sender: TObject);
var
x:tstringlist;
begin
x:=tstringlist.create;
x.Add('url='+Edit1.Text);
x.Add('title='+Edit2.Text);
x.Add('description='+Edit3.Text);
x.Add('image.x=25');
x.Add('image.y=25');
idhttp1.post('http://www.site.ru/index.php?do=addsite',x);

end;







end.
Как вы поняли программа отправляет post запрос
так вот как можно к программе присоединить базу данных
тоесть вместо +Edit1.Text
Код:
 x.Add('url='+Edit1.Text);
использовать данные из таблицы с полем url

Надеюсь ясно формултровал вопрос

А где вопрос в названии темы?
Что "delphi+access"?
Вот рядом тема - "Строки"...
Теперь представьте себе, что вам понадобилось решить какой-то вопрос по работе со строками, вы использовали поиск, а вам вывалилась куча тем:
"Строки"
"Строка"
"Строки"
"Работа со строками"
"Строка"
"Строки"
"Работа со строками"
"Строка"
"Строки"
"Работа со строками"
"Строка"
"Строки"
"Работа со строками"
"Строка"
"Строки"
"Работа со строками"
И в какую из них заглянуть в поисках решения своего вопроса???

Последний раз редактировалось mihali4; 20.03.2009 в 23:52.
eldar вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
БД Access и Delphi Дамир БД в Delphi 5 18.06.2014 11:41
Access+Delphi Levsha100 Помощь студентам 2 27.11.2008 20:22
БД (Delphi, Access) Arkuz БД в Delphi 2 02.10.2008 00:52
Access и Delphi Mitron БД в Delphi 6 10.01.2008 20:25