• R/O
  • SSH
  • HTTPS

chibios: Commit


Commit MetaInfo

Revision13658 (tree)
Time2020-05-22 15:44:46
Authorgdisirio

Log Message

(empty log message)

Change Summary

Incremental Difference

--- branches/chibios_lazarus/projects/license_updater/Main.pas (revision 13657)
+++ branches/chibios_lazarus/projects/license_updater/Main.pas (revision 13658)
@@ -14,6 +14,8 @@
1414
1515 TLicenseChangerForm = class(TForm)
1616 ClearButton: TButton;
17+ Label6: TLabel;
18+ Name2Edit: TEdit;
1719 PathEdit: TEdit;
1820 Label1: TLabel;
1921 PathButton: TButton;
@@ -27,7 +29,7 @@
2729 Label4: TLabel;
2830 KeyEdit: TEdit;
2931 Label5: TLabel;
30- NameEdit: TEdit;
32+ Name1Edit: TEdit;
3133 procedure ClearButtonClick(Sender: TObject);
3234 procedure FormActivate(Sender: TObject);
3335 procedure PathButtonClick(Sender: TObject);
@@ -144,8 +146,10 @@
144146 begin
145147 if Pos(KeyEdit.Text, s) > 0 then
146148 foundkey := True;
147- if Pos(NameEdit.Text, s) > 0 then
149+ if Pos(Name1Edit.Text, s) > 0 then
148150 foundname := True;
151+ if Pos(Name2Edit.Text, s) > 0 then
152+ foundname := True;
149153 end;
150154 Inc(i);
151155 end;
Show on old repository browser