Search options (Page 3 of 6)

вместо него можете использовать idemployee это тот же numberTB

Если в грид нельзя то можно и в Memo, помогите с реализацией пожалуйста, или подталкните как это сделать.

Change this script:

procedure CalculateTotal;
var
  WinPercent, LossPercent: Real;
  WinPercent2, LossPercent2: Real;

begin
  WinPercent:= Form1.edWinPercent.value;
  LossPercent:= Form1.edLossPercent.Value;
  WinPercent2:= Form1.edWinPercent2.value;
  LossPercent2:= Form1.edLossPercent2.Value;

    begin
    if (Form1.edWinCount.Value <> 0) and (Form1.edLossCount.Value <> 0) then
    begin
          Form1.edWinPercent.Value := Form1.edWinCount.value / (Form1.edWinCount.value + Form1.edLossCount.value) * 100;
          Form1.edLossPercent.Value := Form1.edLossCount.value / (Form1.edWinCount.value + Form1.edLossCount.value) * 100;
    end;

    if (Form1.edWinCount2.Value <> 0) and (Form1.edLossCount2.Value <> 0) then
    begin
    Form1.edWinPercent2.Value := Form1.edWinCount2.value / (Form1.edWinCount2.value + Form1.edLossCount2.value) * 100;
    Form1.edLossPercent2.Value := Form1.edLossCount2.value / (Form1.edWinCount2.value + Form1.edLossCount2.value) * 100;
    end;
end;
end;

Solution for 1 section:
procedure frmCustomer_Button1_OnAfterClick (Sender: string);
begin
      Form1.tgSearch_Customers.dbItemID:= Last_Insert_id;
      Form1_tgSearch_Customers_OnCellClick('',0,0);
end;

Solution for 2 section:
procedure Form1_Button8_OnAfterClick (Sender: string);
var
i: integer;
begin
      i:= Form1.tgSearch_Customers.RowCount;
      Form1.tgSearch_Customers.SelectedRow:= i-1;
      Form1_tgSearch_Customers_OnCellClick('',0,0);
end;

Solution for 3 section is same as 1.

увы ничего не получается, в программе моего шрифта не видно, что делать?

Dear teco049!
Can you attach your project?

Нашел решение, выражение выглядит так: \d,\d+
Мне надо было найти все числа которые имеют дробную часть, например 0,0350
Поясню для тех, кто не знает:
\d - любое число
, - понятно что запятая это дробная част
\d+ - опять любое число или больше

Вот вам все основные выражения которые используются:
[abc]    A single character of: a, b, or c
[^abc]    Any single character except: a, b, or c
[a-z]    Any single character in the range a-z
[a-zA-Z]    Any single character in the range a-z or A-Z
^    Start of line
$    End of line
\A    Start of string
\z    End of string
.    Any single character
\s    Any whitespace character
\S    Any non-whitespace character
\d    Any digit
\D    Any non-digit
\w    Any word character (letter, number, underscore)
\W    Any non-word character
\b    Any word boundary
(...)    Capture everything enclosed
(a|b)    a or b
a?    Zero or one of a
a*    Zero or more of a
a+    One or more of a
a{3}    Exactly 3 of a
a{3,}    3 or more of a
a{3,6}    Between 3 and 6 of a

Также прикрепил к примеру Дмитрия если он не против.

Уважаемый alex842!
Спасибо за помощь, сделал как вы сказали, получилось но не так как надо. Надо это скриптом как это сделать.

а как использовать функцию Random на примере букв, т.е. в реале она берет цифры от 0 до 10, а  надо чтобы брал буквы от А до Я.

сам файл скрипта не исчезает, а исчезает содержимое этого файла