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

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

Считывание данных в форму


Doctordradd ©   (2010-11-03 22:42:00) 

В программе существует основная таблица куда записываются данные, данные разделяются на даты вводимые с комбобокса, даты вводятся вручную в группу Viewlist.
Можно вводить новые данные, редактировать уже введенные. Необходимо создать копирование данных и запись в другю дату группы.
При копировании происходит то же что и при редактировании, т.е. данные записываются в новый item группы, при этом исчезая из старого item.
Подскажите как записать считанные данные в новую выбранную с комбобокса дату, при этом сохранив данные на своем месте?
Спасибо.
Чтение:
procedure TForm3.FormActivate(Sender: TObject);
var i:integer;
   SECT:STRING;
begin
try
  Copy.caption:='Copiar esta Visita - '+ansiuppercase(BasePPL.Visitas.ItemFocused.Caption);
  sect:=BasePPL.Visitas.ItemFocused.Caption;
  Datacombobox.Items.clear;
  for i:=1 to BasePPL.groups.Items.Count-1 do begin
    datacombobox.Items.Add(BasePPL.groups.Items[i].caption);
  end;
  Name.text:=SECT;
  Name2.text:=main.ini.ReadString(SECT,'n1','');
  Name3.text:=main.ini.ReadString(SECT,'n2','');
  Name4.text:=main.ini.ReadString(SECT,'n3','');
except
  writeLog(log,'ReadFileError','Copy.FormActivate');
end;
Name.SetFocus;
end;

Запись:
procedure TCopy.InsertClick(Sender: TObject);
var i:integer;
begin
try
  if length(NombresVistante.text)>0 then begin
        main.ini.WriteString(Name.text,'n1',Name2.text);
        main.ini.WriteString(Name.text,'n2',Name3.text);
        main.ini.WriteString(Name.text,'n3',Name4.text);
        main.ini.WriteTime(Name.text,'n4',Now);
        main.ini.WriteString(Name.text,'n7',Datacombobox.Text);
  end
  else showmessage(' ');
except
   writeLog(log,'WriteError','Copy.InsertClick');
end;
end;


12   (2010-11-09 08:55:00) [1]


>  данные типа имя фамилия .. комбобоксом разделяются
> на даты

> увидеть имена, записанные в эту дату

неискушенному человеку с непривычки сложно представить данные процессы..


И. Павел   (2010-11-09 08:07:00) [2]

:-0

Если проблему до сих пор не решили, лучше еще раз переформулируйте. Думаю, до сих пор вам не ответили именно потому, что из [0] и [2] ничего не понятно...


Doctordradd   (2010-11-04 15:55:00) [3]

Существует основная таблица, в которой каждая колонка это name, name2, name3, name4. Эти данные для каждой строки разделяются по датам на группы, используя datacombobox. С формы записываются данные типа имя фамилия и т.д. и комбобоксом разделяются на даты. Нажав на выбранную дату в группе, можно увидеть имена, записанные в эту дату. Даты вводятся вручную в viewlist, далее отображаются в форме для введения, либо редактирования в datacombobox. Необходимо создать копирование данных, т.е. при двойном клике открывается такая же форма как и при введении первый раз данных, но данные считываются в поля формы, при изменении значения datacombobox, все данные пишутся в новое значение даты, при этом исчезая из старой даты, старого значения комбобокса. Пытался добавить новый combobox, записывая и в новое и в старое значение, пытался применять onchange на комбобоксе, все равно при изменении значения данные пишутся в новое измененное.


clickmaker   (2010-11-04 14:47:00) [4]

я понимаю, что испанский - родной язык, но все же можно чуть более по-русски. Ни фига не понятно


Наверх

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