喫茶XRAYトップページ


[12894] Excel_CreateObjectで助言を求めます返信 削除
2019/6/1 (土) 08:37:11 pal
palです。

下記をテスト中です。

400_Excel_CreateObject
  01_Excel_CreateObject


XE2,XE3でProject1.dprを開くと
  WorkSheet.Cells[1,1].Value := 'ABC';
  未定義 .Value と出ます
  コンパイル出来ません??

当方のXEの設定が悪いのでしょうか?
ご教授お願い致します。

ちなみにDelphi7では
program Project1;
  Application.MainFormOnTaskbar := True;
これはリマークでOK

unit Unit1;
procedure TForm1.FormCreate(Sender: TObject);
begin
  FormStyle := fsStayOnTop;
  Self.Left := Screen.PrimaryMonitor.Width - Self.Width;
  Self.Top  := Screen.PrimaryMonitor.WorkareaRect.Top;
end;
下記に変更でOK
  Self.Left := Screen.Width - Self.Width;
  Self.Top  := Screen.WorkareaRect.Top;




[12895] Re:Excel_CreateObjectで助言を求めます返信 削除
2019/6/1 (土) 11:34:49 Mr.XRAY
とりあえすリンク

[400_CreateOleObject によるエクセル操作の基本例] [01_操作サンプル]
http://mrxray.on.coocan.jp/Delphi/plSamples/400_Excel_CreateObject.htm#01


procedure TForm1.Button6Click(Sender: TObject);
begin
  if VarIsEmpty(ExcelObj) then exit;

  ClearActiveSheetCells;
  WorkSheet.Cells[1,1].Value := 'ABC';
  WorkSheet.Cells[1,1].Interior.ColorIndex := 4;
end;

かな ?

>  WorkSheet.Cells[1,1].Value := 'ABC';
>  未定義 .Value と出ます


未定義 ?
OleVariant 型なのでコンパイル時に未定義となることはないと思うのですが.
う〜む.分かりません.


INCM/CMT
Cyclamen v3.82