FreePascal.ru

Прошу прощения за запаривание всех, всё получилось!
Всё работает при простом
Uses Unit1;
Ошибка была в неправильном объявлении процедуры и необходимости события
Тысяча извинений...

Извиняюсь за возможно невнятный вопрос. Дело значит такое:
Имеется программа состоящая из двух юнитов. Первый юнит содержит форму (главный) второй юнит форму не содержит (тоесть был создан не как ...New Form а как ...New Unit) по тому как дополнительная форма мне ненужна а код большой, что требует ...

Мужики! В вопросе же написано - второй юнит не имеет формы!
Запихивание

в процедуру результат не меняет.

Unit1 голый юнит с формой, чек боксом, и лейблом
Unit2
unit Unit2;

{$mode objfpc}{$H+}

interface

uses
Classes, SysUtils, Unit1;

implementation
begin
If Form1.CheckBox1.Checked then
Form1.Label1.Caption:='It works' ;

end.
Project program project1 ...

На что лазарь пишет
Project raised exception class 'External: SIGSEGV '

Если не трудно можно полный код двух юнитов привести?

Всем салют!

Вопрос собственно в Теме, что и где нужно прописать что бы иметь возможность обращаться (на прямую конечно) к компонентам на форме с другого юнита не имеющего формы. (напрмимер проверить положение CheckBox-a )
А то приходиться засорять юнит с формой промежуточными переменными и ...

А Вы вместо xls используйте xml-файл. Excel его открывает как родной. Вы можете написать шаблон в Excel, сохранить его в виде xml, а потом работать с ним либо как обычным DataSet, либо как с FileStream.
У меня эта мысль с самого начала в голове вертелась ну ладно придёться с xml знакомиться ...

Спасибо конечно большое, а как же насчёт приведённого кода?
Или хотябы пример использования того, что изложено в 349-и страничной спецификации xls формата.
Одному не рабзобраться

Здравствуйте участники форума.
Существует след. код

procedure XlsWriteCellLabel(XlsStream: TStream; const ACol, ARow: Word;
const AValue: string);
var
L: Word;
const
{$J+}
CXlsLabel: array[0..5] of Word = ($204, 0, 0, 0, 0, 0&#41 ...