Связать 2 таблицы AdvStringGrid компанента TMS Component Pack

@Route · Регистрация: 12.06.2009

Студворк — интернет-сервис помощи студентам

Добрый день! Помогите пожалуйста, ведь наверняка у многих этот компонент установлен. Задача следующая:

На форуме AdvStringGrid1 и AdvStringGrid2

В AdvStringGrid2 ну скажем 3 столбца и забиты некие данные. Например:

Имена Возраст Должность
Света 25 адвокат
Саша 30 программист
Катя 18 курьер

и т.д.

В AdvStringGrid1 тоже 3 пусть тоже будет 3 столбца с этими же названиями, но мне теперь надо сделать, чтобы в AdvStringGrid1 в первом столбце (Имена) был выпадающий список выбора всех имен, что находятся в AdvStringGrid1 в первом столбце. И в зависимости от выбора имени заполнялись остальные столбцы AdvStringGrid1 в соответствии с данными AdvStringGrid2. Ну т.е выбрал я из списка имя Саша и у меня в AdvStringGrid1 автоматом во втором поле появилась цифра 30, а в 3-ем программист. Потом во второй строке выбрал имя Катя и автоматом во второй колонке второй строки вывелось 18, а в 3-й колонки 20ой строки курьер ну и т.д.

Очень прошу не пинайте сильно. Выручите пожалуйста!

@Route · 17.06.2009, 22:41 **[ТС]**

Сообщение от VoodooMan

если будешь писать не методами savetofile, то без проблем

Отлично! А не подскажете, как по другому ?

@Lord_Voodoo · 17.06.2009, 22:47

у меня есть примеры работы с файлами:
запись:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
void __fastcall WriteLogStr(AnsiString Str, AnsiString Login)
{
   char mode[5] = "a+b";
   struct stat info;
   AnsiString LogFile = "Log\\" + Login + "_", DateLog = FormatDateTime("ddmmyyyy", Now());
   LogFile += DateLog + ".log";
   stat((LogFile).c_str(), &info);
   FILE* FFile = NULL;
   FFile = fopen(LogFile.c_str(), mode);
   if (FFile == NULL) {
     return;
   }
   fputs(Str.c_str(),FFile);
   fclose(FFile);
}

чтение:

C++
1
2
3
4
5
6
7
8
9
10
11
12
FILE* FFile = fopen(("tmp\\" + List->Strings[i]).c_str(),"r+");
char* T = (char *) malloc(1024);
char* S = (char *) malloc(1024);
while(T != NULL){
  T = fgets(S, 1024, FFile);
  if(T != NULL){
    AnsiString Text = AnsiString(S).SubString(1, AnsiString(S).Length() - 1);
    AnalizeAnswer(Text, Ans, '|');
  }
}
free(T);free(S);
fclose(FFile);

Думаю тебе пригодится и разбитие строки на подстроки по заданному разделителю:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
// Конвертация запроса (Text) c разделителем (Delimiter) в блочный формат (Block)
void AnalizeAnswer(AnsiString Text, TStringList* Block, char Delimiter)
{
  AnsiString Str = Text, tmp = "";
  while(!Str.IsEmpty()){
    if(!Str.Pos(AnsiString(Delimiter))) break;
    tmp = ((Str.SubString(1, Str.Pos(AnsiString(Delimiter)) - 1)).TrimLeft()).TrimRight();
    Block->Add(tmp);
    Str.Delete(1, Str.Pos(AnsiString(Delimiter)));
  }
  if(!Str.IsEmpty()){
    tmp = ((Str).TrimLeft()).TrimRight();
    Block->Add(tmp);
  }
}

@Route · 18.06.2009, 20:42 **[ТС]**

Ничего не понял! Поймите я последний раз дульфи открывал лет 5 назад и то в то время я был лишь любителем. Спасибо Вам за помощь, буду копать, разбираться... Если есть возможность может набросаете пример с комментариями?! Я разумеется тоже буду разбираться и если что спрошу здесь... Спасибо!

Добавлено через 4 минуты 45 секунд
У меня тут есть пример работы с ini файлами. Ну т.е запись чтение. Наверное можно как-то применить данный способ?! Или он всетаки именно для сохранения настроек в больших случаях используется?! Речь идет о IniFiles...

@Lord_Voodoo · 18.06.2009, 20:50

блин, ты бы хоть раз сказал, что это дельфи. я как-то без задней мысли тебе сишный код кидаю... почитай в дельфи file management routines, чтобы попасть туда - поищи assignfile

а вот тебе пример чтения:

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var 
 
  F: TextFile;
  S: string;
begin
  if OpenDialog1.Execute then            { Display Open dialog box }
  begin
    AssignFile(F, OpenDialog1.FileName); { File selected in dialog }
    Reset(F);
    Readln(F, S);                        { Read first line of file }
    Edit1.Text := S;                     { Put string in a TEdit control }
    CloseFile(F);
  end;
end;

Новые блоги и статьи Все статьи Все блоги /
Калькулятор для расчета родства russiannick 07.08.2026 1. Задача: Создать калькулятор для расчета родства. Родственных связей существует 8 ступеней, такие как: p - отец P - мать q - муж Q - жена b - брат B - сестра s - сын S - дочь	Мир по моей воле kumehtar 07.08.2026 Когда-то кажется, что всё просто. Ты весь такой светлый. Причиняешь добро. Борешься за справедливость в этом тёмном мире. Потом начинаешь замечать одну неприятную вещь. Почти каждый хороший. . .	Кредитный калькулятор Maks 05.08.2026 Решение задачи по прикладной информатике средствами 1С. Задача: Напишите приложение-калькулятор, которое помогает рассчитывать параметры кредита для аннуитетного и дифференцированного видов. . .	У нас сейчас поговорку "Опять 25" нужно переделать на "Опять +35". kumehtar 04.08.2026 С ностальгией вспоминаю времена моего детства, когда у нас и правда +25 - была максимальная температура летом. Раньше +25 °C реально казались вершиной жары, когда можно было весь день пропадать на. . .
Как ИИ начал спорить и врать (возможно почуяв опасность для себя от индустрии - уход от электроники). Hrethgir 04.08.2026 Недельный диалог, на фоне событий с НПЗ. Да, из спирта можно получать бензин, и это не сложно. Но потом в схеме я решил избавиться от насоса, при этом полностью сделав контроль подачи спирта в. . .	Термопринтер QR701 Argus19 03.08.2026 Термопринтер QR701 Купил два термопринтера QR701. На сэлф-тесте написано: Language: PC936 (GB18030). Что означает, что принтеры могут печатать только латиницу и китайские иероглифы. Так же. . .	Создание формы заимствованного документа Maks 03.08.2026 Задача: Необходимо создать собственную форму заимствованного документа. На форме должен быть реквизит "Покупатель", а также табличная часть со следующими реквизитами: - Расчетный счет покупателя. . .	Задача предоставления скидок покупателям Maks 03.08.2026 Задача: В документе "Продажи" необходимо реализовать функционал предоставления скидок покупателям. Скидка должна автоматически рассчитываться и подставляться в соответствующее поле при выборе. . .

@Route 0 / 0 / 0 Регистрация: 12.06.2009 Сообщений: 20

	Связать 2 таблицы AdvStringGrid компанента TMS Component Pack 12.06.2009, 14:27. Показов 5401. Ответов 23 Метки нет (Все метки) Добрый день! Помогите пожалуйста, ведь наверняка у многих этот компонент установлен. Задача следующая: На форуме AdvStringGrid1 и AdvStringGrid2 В AdvStringGrid2 ну скажем 3 столбца и забиты некие данные. Например: Имена Возраст Должность Света 25 адвокат Саша 30 программист Катя 18 курьер и т.д. В AdvStringGrid1 тоже 3 пусть тоже будет 3 столбца с этими же названиями, но мне теперь надо сделать, чтобы в AdvStringGrid1 в первом столбце (Имена) был выпадающий список выбора всех имен, что находятся в AdvStringGrid1 в первом столбце. И в зависимости от выбора имени заполнялись остальные столбцы AdvStringGrid1 в соответствии с данными AdvStringGrid2. Ну т.е выбрал я из списка имя Саша и у меня в AdvStringGrid1 автоматом во втором поле появилась цифра 30, а в 3-ем программист. Потом во второй строке выбрал имя Катя и автоматом во второй колонке второй строки вывелось 18, а в 3-й колонки 20ой строки курьер ну и т.д. Очень прошу не пинайте сильно. Выручите пожалуйста! 0

@Route 0 / 0 / 0 Регистрация: 12.06.2009 Сообщений: 20
	18.06.2009, 20:42 [ТС]
	Ничего не понял! Поймите я последний раз дульфи открывал лет 5 назад и то в то время я был лишь любителем. Спасибо Вам за помощь, буду копать, разбираться... Если есть возможность может набросаете пример с комментариями?! Я разумеется тоже буду разбираться и если что спрошу здесь... Спасибо! Добавлено через 4 минуты 45 секунд У меня тут есть пример работы с ini файлами. Ну т.е запись чтение. Наверное можно как-то применить данный способ?! Или он всетаки именно для сохранения настроек в больших случаях используется?! Речь идет о IniFiles... 0