Close Table - История изменений

Hisava в 13:27, 26 апреля 2017

2017-04-26T13:27:01Z

2017-04-26T13:25:15Z

‎Текст

2017-04-26T13:24:52Z

‎Смотрите также

2017-04-26T13:24:35Z

2017-04-26T13:24:02Z

2016-08-16T11:10:40Z

‎Текст

2016-08-16T11:10:22Z

‎Исходники

2016-08-16T11:10:05Z

2016-08-16T11:08:23Z

2016-08-16T11:07:57Z

Новая страница: « Close_Table(ClearFields=True) = Смотрите также = Функции Delphi Полезные функции»

Новая страница

Close_Table(ClearFields=True)

= Смотрите также =

[[Функции Delphi]]

[[Полезные функции]]

@@ Строка 1: / Строка 1: @@
 [[Close_Table]] - это процедура
   Без описания
-[[Close_Table]](ClearFields=True)
+[[Close_Table]]( ClearFields=True )
 = Текст =
@@ Строка 8: / Строка 8: @@
   type
-   TQREvClose_Table = class(TQREvDbFunction)
+   TQREv[[Close_Table]] = class(TQREvDbFunction)
    public
      function Calculate: TQREvResult; override;
    end;
-  function TQREvClose_Table.Calculate: TQREvResult;
+  function TQREv[[Close_Table]].Calculate: TQREvResult;
   var ClearFlds: Boolean;
   begin

@@ Строка 5: / Строка 5: @@
 = Текст =
-  { TQREvClose_Table }
+  { TQREv[[Close_Table]] }
   type

@@ Строка 1: / Строка 1: @@
 [[Close_Table]] - это процедура
+ Без описания
-Close_Table(ClearFields=True)
+[[Close_Table]](ClearFields=True)
 = Текст =

← Предыдущая		Версия 13:24, 26 апреля 2017
Строка 1:		Строка 1:
−	Close_Table - это процедура	+	[[Close_Table]] - это процедура

	Close_Table(ClearFields=True)		Close_Table(ClearFields=True)

@@ Строка 19: / Строка 19: @@
     if ArgList.Count > 0 then
        ClearFlds := Argument(0).BooResult;
-    CloseTable(GetWorkArea, ClearFlds);
+    [[CloseTable]](GetWorkArea, ClearFlds);
     Result := NilValue;
   end;

← Предыдущая		Версия 11:10, 16 августа 2016
Строка 2:		Строка 2:

	Close_Table(ClearFields=True)		Close_Table(ClearFields=True)
		+
		+	= Исходники =
		+
		+	{ TQREvClose_Table }
		+
		+	type
		+	TQREvClose_Table = class(TQREvDbFunction)
		+	public
		+	function Calculate: TQREvResult; override;
		+	end;
		+
		+	function TQREvClose_Table.Calculate: TQREvResult;
		+	var ClearFlds: Boolean;
		+	begin
		+	ClearFlds := True;
		+	if ArgList.Count > 0 then
		+	ClearFlds := Argument(0).BooResult;
		+	CloseTable(GetWorkArea, ClearFlds);
		+	Result := NilValue;
		+	end;

	= Смотрите также =		= Смотрите также =

← Предыдущая		Версия 11:08, 16 августа 2016
Строка 1:		Строка 1:
		+	Close_Table - это процедура

	Close_Table(ClearFields=True)		Close_Table(ClearFields=True)