имеются две колонки в Excel. Необходимо вывести куда нибудь на форму две таблицы.

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.
![]() |
marwell |
![]() ![]()
Сообщение
#1
|
Бывалый ![]() ![]() ![]() Группа: Пользователи Сообщений: 198 Пол: Мужской Репутация: ![]() ![]() ![]() |
доброго дня
имеются две колонки в Excel. Необходимо вывести куда нибудь на форму две таблицы. ![]() |
![]() ![]() |
IUnknown |
![]()
Сообщение
#2
|
![]() Гуру ![]() ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 1 013 Пол: Мужской Ада: Разработчик Embarcadero Delphi: Сторонник Free Pascal: Разработчик Репутация: ![]() ![]() ![]() |
К сожалению, тот форум сбоит, но он тебе советовал не OnGetEditText, а OnSetEditText, насколько я успел увидеть...
procedure TForm1.StringGrid1SetEditText(Sender: TObject; ACol, ARow: Integer;
const Value: string);
begin
Calculate(ACol, ARow);
end;
прекрасно пересчитывает данные. Только убери этот дурацкий ShowMessage('Calculate'), он всё портит... |
marwell |
![]()
Сообщение
#3
|
Бывалый ![]() ![]() ![]() Группа: Пользователи Сообщений: 198 Пол: Мужской Репутация: ![]() ![]() ![]() |
К сожалению, тот форум сбоит, но он тебе советовал не OnGetEditText, а OnSetEditText, насколько я успел увидеть... procedure TForm1.StringGrid1SetEditText(Sender: TObject; ACol, ARow: Integer;
const Value: string);
begin
Calculate(ACol, ARow);
end;
прекрасно пересчитывает данные. Только убери этот дурацкий ShowMessage('Calculate'), он всё портит...спасибо ![]() Цитата Только убери этот дурацкий ShowMessage('Calculate'), он всё портит... я это приписал так, только чтоб увидеть заходит ли туда вообще ... |
![]() ![]() |
![]() |
Текстовая версия | 29.04.2025 8:31 |