Значение ячейки.

[Daivel]

Доброго времени суток. Есть такой вопрос. Клиент-Серверна БД.
Есть возможность регистрации.
Каждый пользователь может отправить файл другому зарегистрированному пользователю.

var
  fn, fe: string;
begin
  if OpenDialog1.Execute then
  begin
    fn:=ExtractFileName(OpenDialog1.FileName);
    fe:=ExtractFileExt(OpenDialog1.FileName);
    datamodule2.ClientDataSetOutbox.Insert;
    datamodule2.ClientDataSetOutbox.FieldByName('название').AsString:=fn;
    datamodule2.ClientDataSetOutbox.FieldByName('расширение').AsString:=fe;
    datamodule2.ClientDataSetOutbox.FieldByName('ид_от').AsInteger:=datamodule2.ID_User;

    datamodule2.ClientDataSetOutbox.FieldByName('ид_кому').AsInteger:=DBLookupComboBox1.KeyValue;

    datamodule2.ClientDataSetOutbox.FieldByName('дата').AsDateTime:=now;
    tblobfield(datamodule2.ClientDataSetOutbox.FieldByName('файл')).LoadFromFile(OpenDialog1.FileName);
    datamodule2.ClientDataSetOutbox.Post;
  end;

В таблице есть поля "ид_от" и "ид_кому" в них заноситься информация кто и кому отправил файл. Хотелось бы спросить. Как сделать так что бы в компоненте DBgrid вместо ид пользователя занесённого в эти столбцы выводились логины пользователей которые отправили и получи этот файл?

[JUDAS]

datamodule2.ClientDataSetOutbox.FieldByName('id').OnGetText = ФУНКЦИЯ_ХХХ;
.....
procedure ФУНКЦИЯ_ХХХ(sender : TField; var text : string);
begin
  text := sender.DataSet.FieldByName('аккаунт_юзера').AsString;
end;

[xxbesoxx]

Есть возможность регистрации.

1) Если есть возможносты регистраций , Тогда должен таблица для этого . на пример User_Tab ,
2) А для отправки файлов и переписки второе таблица , на пример history_Tab и между нимы связь один ко многим

Как сделать так что бы в компоненте DBgrid вместо ид пользователя занесённого в эти столбцы выводились логины пользователей

3) Писать простой inner join и отбрасывать ненужные полей и оставлять что нужно .
4) Резултать запроса отображаем в DBgrid

JUDAS скажите пожалуйста что это дасть ??? задача решаетсия SQL надо резултать запроса отобрашать Gride , причем тут функция ? и еще procedure ФУНКЦИЯ_ХХХ процедура и функция 2 разные вещи

[JUDAS]

скажите пожалуйста что это дасть ???

рекомендую прочитать про свойства и методы класса TField в частности OnGetText что он даёт и зачем его вообще написали.

по поводу запроса, который вы рекомендуете.
Считается, что автор темы работает уже с говотым запросом у которого есть все указанные вами поля таблиц. Вопрос был задан - оторажать вместо id аккаунт, а не отобразить поле с запроса.

по поводу функций и процедур.
Для информации, в С++ например вообще нет процедур (это вам для общего развития)

[Daivel]

to xxbesoxx Да есть таблица для пользователей "users" и есть таблица "box" в которой и хранятся переданные файлы, ид тех кто передал и кому передавали.
При авторизации в DBGrid выводится таблица Inbox для пользователя который сейчас залогине, при нажатии клавиши загружается таблица переданных файлов этого пользователя. И вот тут начинается мой вопрос. Мне нужно что бы в столбце с ид пользователей были не их порядковый номер, а имя. Можно подробней как реализовать что вы предложили. Я использую Access и ADO.

[xxbesoxx]

To JUDAS Вопрос был задан - оторажать вместо id аккаунт, а не отобразить поле с запроса

Да, вот #1 такой

Как сделать так что бы в компоненте DBgrid вместо ид пользователя занесённого в эти столбцы выводились логины пользователей

[Daivel]

to JUDAS вот запрос который внутри ClientDatsSetOutbox

SELECT * FROM [box]

А это запрос на вывод данных в DBGrid

    DataModule2.ClientDataSetOutbox.CommandText:='SELECT * FROM [box] WHERE [ид_от]='+inttostr(datamodule2.ID_User);
    DataModule2.ClientDataSetOutbox.Open;

[xxbesoxx]

To JUDAS Вопрос был задан - оторажать вместо id аккаунт, а не отобразить поле с запроса

Да, вот на #1

Как сделать так что бы в компоненте DBgrid вместо ид пользователя занесённого в эти столбцы выводились логины пользователей

Для информации, в С++ например вообще нет процедур

Здравствуйте причем тут C++ ? Тема разделе БД в Delphi и задача решается в SQL ! А программа можно писать на Delphi и на C++ Но, на данный момент задача они не реашаеть

to xxbesoxx Да есть таблица для пользователей "users" и есть таблица "box" в которой и хранятся переданные файлы, ид тех кто передал и кому передавали

Ладно приступаем
1)

create table Users
(
 u_id int identity(1,1) primary key,
 u_FIO  nvarchar(30),
 u_Login nvarchar(20),
 u_Password nvarchar(30) 
)

2) На пример добавим несколько пользовател

insert into Users
           ( u_FIO ,
             u_Login ,
             u_Password
            )
       values
       ( N'Васия пупкин',
         N'Vasia',
         N'1111'
       
       ),
       ( N'Иване Иванов',
         N'ivane',
         N'0000'
       ),
       ( N'Какой то пользовател',
         N'xxxx',
         N'2222'
       )

select * from Users

3) Таблица box

create table box
(
 d_id int identity,
 d_date datetime default getdate(),
 d_Text nvarchar(max),
 d_userID int not null,
 constraint FK_Box foreign key ( d_userID) references users(u_id) on delete cascade
);

4) Начинается переписка между пользователи

insert into box ( 
                 d_Text ,
                 d_userID
                 )
        values
        (
         N'Привет как дела', 1
        ),
        (
         N'Нормально, Вы как', 2
        ),
        (
         N'Сегодня будите на работу', 1
        ),
        (
         N'Да буду ;)', 1 -- Здесь надо было 2 это же id  Иване Иванов
        )
  select * from box

5) Начинаю собрать данных через inner join

  select *
  from Users U INNER JOIN box B
  on u.u_id = b.d_userID

6) Отбрасываю не нужны полей

  select u.u_FIO, b.d_date, b.d_Text, u.u_Login
  from Users U INNER JOIN box B
  on u.u_id = b.d_userID

Резултат запроса можно отображать Gride да ? так понятно ?

 (это вам для общего развития)

А C++ это мода чтоли если C++ думайте, что всё будеть ++
О_оо это разговор уже выходить из рамкы даного темы который создал "автор" Я не выжу вопрос про C++