代码搜索结果
找到约 85,229 项符合
Sender 的代码
marshaller.java
package MessageMarshaller;
import java.lang.String;
public class Marshaller
{
public byte[] marshal(Message theMsg)
{
String m = " " + theMsg.sender + ":" + theMsg.data;
byte b[] =
实例——打印报表的脚注.txt
procedure TReportForm.PrintFooterReport2(Sender: TObject)；
begin { 打印报表2的脚注 }
with Sender as TBaseReport do
begin
SetFont('Times New Roman',8)；
//调用TbaseRepo
实例——打印报表的列标题.txt
procedure TReportForm.OnNewColumnReport2(Sender: TObject)；
Caption：String；
begin
with Sender as TBaseReport do
begin
Underline := true；
case I of //其中I为Integer类型的全局变
实例——打印报表标题.txt
procedure TRpForm.RvNDRWriter1NewPage(Sender: TObject)；
begin
with Sender as TBaseReport do begin
PrintBitmapRect(0.5,0.5,1.20,1.20,Logo)；
MarginTop := 0.5；
实例——打印报表的头注.txt
procedure TReportForm.PrintHeaderReport2(Sender: TObject)；
begin {打印报表2的头注}
with Sender as TBaseReport do begin
MarginTop := 0.5；
SetFont('Arial',24)；
//设置打印
实例——打印报表的表体.txt
function TReportForm.PrintPageReport2(Sender: TObject；
var PageNum: integer): Boolean；
begin { 报表2 }
with Sender as TBaseReport do begin
SetFont(
实例——重新显示当前页.txt
procedure TRpPreviewForm.RvRenderPreview1ZoomChange(Sender: TObject)；
var String1: string[10]；
begin
Str(RvRenderPreview1.ZoomFactor:1:1,String1)；
// 将double类型的ZoomFactor缩放百分数根据指定的位数转换为串，
实例——确定用户登录数据库的合法性.txt
procedure TForm1.SQLConnectionBeforeConnect(Sender: TObject);
begin
with Sender as TSQLConnection do
begin
if LoginPrompt = False then
{判别TSQLConnection
实例——加载和保存监控信息.txt
procedure TForm1.FormCreate(Sender: TObject);
begin
TSQLMonitor(Sender). LoadFromFile ('D:\MyLog.txt');
//将MyLog.txt文件的内容装入到TraceList属性中
end;
procedure TForm1.SQLMon
实例——使用locate方法定位记录.txt
procedure TForm1.LocatePositionBtnClick(Sender: TObject)；
begin
YaoPin.open；
with YaoPin do
Locate('品名；厂牌',VarArrayOf(['冰箱', '科龙集团']),
[loPartialKey])；
End；