小编cap*_*tiv的帖子

procedure questiontype;  
 begin  
  writeln ('Enter the type of question you would like...');  
  writeln ('1. Add');  
  writeln ('2. Multiply');  
  writeln ('3. Subtraction');  
  writeln ('4. Division');  
  readln (typeofquestion);  
   case typeofquestion of
    1: add;
    2: multiply;
    3: subraction;
    4: division   
else writeln ('Choose again'); 
end;
end;          

所有程序都是加法,乘法,减法和除法.如果我把它放在主程序中,它将工作正常,但当我把它作为一个程序本身,我得到错误未声明的标识符.我在许多网站上看过一个这样的例子,但我找不到任何网站.

make add,multiply,subtraction,division如何从这个内部进入程序？

我想为每封输入不同名称和地址的信件创建邮件服务.我已经使用Microsoft示例作为基点http://support.microsoft.com/kb/229310,我已经根据自己的喜好对其进行了定制.但是当我试图获取dbgrid的选定行或整个事件的数据时,我的问题出现了.我不知道该怎么做.我的第一个想法是对行数量做1,然后放下一些tedit框并将它们等于mailmerged数据,但这仍然只是一次一个.dbgrid链接到ms outlook.这是他们填写数据的方式..

// Open the file to insert data
wrdDataDoc := wrdApp.Documents.Open('E:\Temp.doc');
 for iCount := 1 to (DBGrid1.DataSource.DataSet.RecordCount) do
wrdDataDoc.Tables.Item(1).Rows.Add;
FillRow(wrdDataDoc, 2, 'Steve', 'DeBroux',
    '4567 Main Street', 'Buffalo, NY  98052');
// Fill in the data
FillRow(wrdDataDoc, 3, 'Jan', 'Miksovsky',
    '1234 5th Street', 'Charlotte, NC  98765');
FillRow(wrdDataDoc, 4, 'Brian', 'Valentine',
    '12348 78th Street  Apt. 214', 'Lubbock, TX  25874');

那么我如何从dbgrid中获取数据并用该信息填充文件？