Edit vs StringGrid

[artemavd]

Есть две разные программы на Delphi 7. Одна программа считает оценки по критериям. Другая строит гистограммы оценок. Работают независимо от друг друга. На первой программе оценки (данные) вводятся в Edit-ы, а во второй программе они вводятся в StringGrid. В StringGrid-е два столбца: 1-ый - Названия оценок (пятерки, четверки и т.д), 2-ой - Количеств. Нажимаешь на кнопку и программа строит гистограмму из данных этой таблицы. А я хотел объединить их. Хотел сделать так, чтобы оценки брались из первой проги (чтообы их не вводить снова) и по ним строить гистограмму. Как мне это сделать? Как написать, чтобы он брал данные из эдитов первой проги, а не из StringGrid-а? Помогите сделать!)

[edgy]

Из edit'ов считываете данные, например, в массив, а затем по данным массива строите гистограмму.

[artemavd]

edgy, а можете написать пример такой порцедуры, которая бы делала бы это? Очень надо. Пожалуйста)

[rubi]

Из разных приложений данные с форм перенести не получится. Есть несколько обходных путей. Самый лучший - это присоединить элементарную базу данных из одной таблицы и по ней строишь гистограмму. Подобную программу (присоединить БД, загрузить туда данные двух полей, считать данные) можно написать, прочитав пару страниц из любого учебника по дельфи, в т.ч. скачанного из инета.
Есть другой способ - он заморочнее. Если ты знаешь имя своего Edit'a (как он называется в исходниках), то ты можешь в другой программе узнать handle этого контрола и добраться до его свойств
var EditWnd : HWND
begin
EditWnd := FindWindowEx(FindWindow(nil, 'Form1'), 0,
'EDIT', nil); //здесь 'EDIT' - это имя твоего эдита, 'Form1'-имя формы
//где этот эдит находится
Result := SendMessage(EditWnd, WM_GETTEXT, 0, 0); //здесь
//поподробнее разберись - точно не помню как взять текст
end;