You've already forked lazarus-ccr
User is now able to input answers in gameplayform.
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1941 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
@ -76,8 +76,8 @@ end;
|
||||
|
||||
procedure TForm1.btnLoadClick(Sender: TObject);
|
||||
begin
|
||||
Hide;
|
||||
Form2.Show;
|
||||
Hide;
|
||||
|
||||
end;
|
||||
|
||||
|
@ -23,6 +23,7 @@ object Form2: TForm2
|
||||
Height = 23
|
||||
Top = 392
|
||||
Width = 514
|
||||
OnKeyPress = Edit1KeyPress
|
||||
TabOrder = 1
|
||||
end
|
||||
object Image1: TImage
|
||||
@ -1546,4 +1547,16 @@ object Form2: TForm2
|
||||
ReadOnly = True
|
||||
TabOrder = 4
|
||||
end
|
||||
object Memo1: TMemo
|
||||
Left = 383
|
||||
Height = 181
|
||||
Top = 76
|
||||
Width = 130
|
||||
Lines.Strings = (
|
||||
'[TESTE]'
|
||||
'Palavras escritas:'
|
||||
''
|
||||
)
|
||||
TabOrder = 5
|
||||
end
|
||||
end
|
||||
|
@ -22,7 +22,9 @@ type
|
||||
Label1: TLabel;
|
||||
Label2: TLabel;
|
||||
Label3: TLabel;
|
||||
Memo1: TMemo;
|
||||
procedure btnExitClick(Sender: TObject);
|
||||
procedure Edit1KeyPress(Sender: TObject; var Key: char);
|
||||
procedure FormCreate(Sender: TObject);
|
||||
private
|
||||
{ private declarations }
|
||||
@ -51,10 +53,20 @@ begin
|
||||
|
||||
end;
|
||||
|
||||
procedure TForm2.Edit1KeyPress(Sender: TObject; var Key: char);
|
||||
begin
|
||||
if Key = #13 then
|
||||
begin
|
||||
Form2.Memo1.Lines.Add(Edit1.Text);
|
||||
Form2.Edit1.Clear;
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TForm2.FormCreate(Sender: TObject);
|
||||
begin
|
||||
|
||||
end;
|
||||
|
||||
|
||||
end.
|
||||
|
||||
|
@ -39,7 +39,7 @@
|
||||
<Filename Value="tappytux.lpr"/>
|
||||
<IsPartOfProject Value="True"/>
|
||||
<UnitName Value="tappytux"/>
|
||||
<UsageCount Value="34"/>
|
||||
<UsageCount Value="35"/>
|
||||
</Unit0>
|
||||
<Unit1>
|
||||
<Filename Value="gameconfigform.pas"/>
|
||||
@ -50,10 +50,11 @@
|
||||
<IsVisibleTab Value="True"/>
|
||||
<EditorIndex Value="0"/>
|
||||
<WindowIndex Value="0"/>
|
||||
<TopLine Value="96"/>
|
||||
<CursorPos X="70" Y="97"/>
|
||||
<UsageCount Value="34"/>
|
||||
<TopLine Value="68"/>
|
||||
<CursorPos X="16" Y="85"/>
|
||||
<UsageCount Value="35"/>
|
||||
<Loaded Value="True"/>
|
||||
<LoadedDesigner Value="True"/>
|
||||
</Unit1>
|
||||
<Unit2>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
@ -63,9 +64,9 @@
|
||||
<UnitName Value="gameplayform"/>
|
||||
<EditorIndex Value="1"/>
|
||||
<WindowIndex Value="0"/>
|
||||
<TopLine Value="28"/>
|
||||
<CursorPos X="83" Y="42"/>
|
||||
<UsageCount Value="34"/>
|
||||
<TopLine Value="40"/>
|
||||
<CursorPos X="48" Y="60"/>
|
||||
<UsageCount Value="35"/>
|
||||
<Loaded Value="True"/>
|
||||
<LoadedDesigner Value="True"/>
|
||||
</Unit2>
|
||||
@ -77,7 +78,7 @@
|
||||
<WindowIndex Value="0"/>
|
||||
<TopLine Value="1"/>
|
||||
<CursorPos X="21" Y="24"/>
|
||||
<UsageCount Value="28"/>
|
||||
<UsageCount Value="29"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit3>
|
||||
<Unit4>
|
||||
@ -86,9 +87,9 @@
|
||||
<UnitName Value="tappydrawer"/>
|
||||
<EditorIndex Value="5"/>
|
||||
<WindowIndex Value="0"/>
|
||||
<TopLine Value="67"/>
|
||||
<TopLine Value="1"/>
|
||||
<CursorPos X="70" Y="291"/>
|
||||
<UsageCount Value="28"/>
|
||||
<UsageCount Value="29"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit4>
|
||||
<Unit5>
|
||||
@ -99,7 +100,7 @@
|
||||
<WindowIndex Value="0"/>
|
||||
<TopLine Value="1"/>
|
||||
<CursorPos X="35" Y="72"/>
|
||||
<UsageCount Value="28"/>
|
||||
<UsageCount Value="29"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit5>
|
||||
<Unit6>
|
||||
@ -108,9 +109,9 @@
|
||||
<UnitName Value="mod_tappywords"/>
|
||||
<EditorIndex Value="6"/>
|
||||
<WindowIndex Value="0"/>
|
||||
<TopLine Value="1"/>
|
||||
<TopLine Value="12"/>
|
||||
<CursorPos X="1" Y="15"/>
|
||||
<UsageCount Value="28"/>
|
||||
<UsageCount Value="29"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit6>
|
||||
<Unit7>
|
||||
@ -121,7 +122,7 @@
|
||||
<WindowIndex Value="0"/>
|
||||
<TopLine Value="1"/>
|
||||
<CursorPos X="30" Y="70"/>
|
||||
<UsageCount Value="28"/>
|
||||
<UsageCount Value="29"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit7>
|
||||
<Unit8>
|
||||
@ -132,7 +133,7 @@
|
||||
<WindowIndex Value="0"/>
|
||||
<TopLine Value="1"/>
|
||||
<CursorPos X="6" Y="39"/>
|
||||
<UsageCount Value="27"/>
|
||||
<UsageCount Value="28"/>
|
||||
<Loaded Value="True"/>
|
||||
</Unit8>
|
||||
<Unit9>
|
||||
@ -145,124 +146,124 @@
|
||||
</Units>
|
||||
<JumpHistory Count="30" HistoryIndex="29">
|
||||
<Position1>
|
||||
<Filename Value="gameconfigform.pas"/>
|
||||
<Caret Line="53" Column="82" TopLine="53"/>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="23" Column="20" TopLine="4"/>
|
||||
</Position1>
|
||||
<Position2>
|
||||
<Filename Value="gameconfigform.pas"/>
|
||||
<Caret Line="92" Column="6" TopLine="92"/>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="48" Column="41" TopLine="21"/>
|
||||
</Position2>
|
||||
<Position3>
|
||||
<Filename Value="gameconfigform.pas"/>
|
||||
<Caret Line="77" Column="3" TopLine="77"/>
|
||||
<Caret Line="105" Column="52" TopLine="69"/>
|
||||
</Position3>
|
||||
<Position4>
|
||||
<Filename Value="gameconfigform.pas"/>
|
||||
<Caret Line="104" Column="3" TopLine="104"/>
|
||||
<Caret Line="108" Column="38" TopLine="96"/>
|
||||
</Position4>
|
||||
<Position5>
|
||||
<Filename Value="gameconfigform.pas"/>
|
||||
<Caret Line="78" Column="3" TopLine="60"/>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="23" Column="28" TopLine="9"/>
|
||||
</Position5>
|
||||
<Position6>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="18" Column="14" TopLine="1"/>
|
||||
<Caret Line="47" Column="40" TopLine="23"/>
|
||||
</Position6>
|
||||
<Position7>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="23" Column="14" TopLine="1"/>
|
||||
<Caret Line="30" Column="35" TopLine="26"/>
|
||||
</Position7>
|
||||
<Position8>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="21" Column="14" TopLine="6"/>
|
||||
<Caret Line="32" Column="35" TopLine="28"/>
|
||||
</Position8>
|
||||
<Position9>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="35" Column="8" TopLine="8"/>
|
||||
<Caret Line="31" Column="35" TopLine="27"/>
|
||||
</Position9>
|
||||
<Position10>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="8" Column="77" TopLine="1"/>
|
||||
<Caret Line="50" Column="1" TopLine="22"/>
|
||||
</Position10>
|
||||
<Position11>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="9" Column="3" TopLine="1"/>
|
||||
<Caret Line="51" Column="1" TopLine="23"/>
|
||||
</Position11>
|
||||
<Position12>
|
||||
<Filename Value="gameconfigform.pas"/>
|
||||
<Caret Line="98" Column="19" TopLine="71"/>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="52" Column="1" TopLine="24"/>
|
||||
</Position12>
|
||||
<Position13>
|
||||
<Filename Value="gameconfigform.pas"/>
|
||||
<Caret Line="96" Column="6" TopLine="73"/>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="53" Column="1" TopLine="25"/>
|
||||
</Position13>
|
||||
<Position14>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="29" Column="7" TopLine="10"/>
|
||||
<Caret Line="54" Column="1" TopLine="26"/>
|
||||
</Position14>
|
||||
<Position15>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="35" Column="79" TopLine="21"/>
|
||||
<Caret Line="55" Column="1" TopLine="27"/>
|
||||
</Position15>
|
||||
<Position16>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="23" Column="20" TopLine="4"/>
|
||||
<Caret Line="32" Column="3" TopLine="28"/>
|
||||
</Position16>
|
||||
<Position17>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="48" Column="41" TopLine="21"/>
|
||||
<Caret Line="34" Column="3" TopLine="30"/>
|
||||
</Position17>
|
||||
<Position18>
|
||||
<Filename Value="gameconfigform.pas"/>
|
||||
<Caret Line="105" Column="52" TopLine="69"/>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="58" Column="26" TopLine="35"/>
|
||||
</Position18>
|
||||
<Position19>
|
||||
<Filename Value="gameconfigform.pas"/>
|
||||
<Caret Line="108" Column="38" TopLine="96"/>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="51" Column="41" TopLine="35"/>
|
||||
</Position19>
|
||||
<Position20>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="23" Column="28" TopLine="9"/>
|
||||
<Caret Line="45" Column="50" TopLine="31"/>
|
||||
</Position20>
|
||||
<Position21>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="47" Column="40" TopLine="23"/>
|
||||
<Caret Line="75" Column="3" TopLine="43"/>
|
||||
</Position21>
|
||||
<Position22>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="30" Column="35" TopLine="26"/>
|
||||
<Caret Line="56" Column="5" TopLine="33"/>
|
||||
</Position22>
|
||||
<Position23>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="32" Column="35" TopLine="28"/>
|
||||
<Caret Line="28" Column="43" TopLine="23"/>
|
||||
</Position23>
|
||||
<Position24>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="31" Column="35" TopLine="27"/>
|
||||
<Filename Value="gameconfigform.pas"/>
|
||||
<Caret Line="82" Column="45" TopLine="66"/>
|
||||
</Position24>
|
||||
<Position25>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="50" Column="1" TopLine="22"/>
|
||||
<Filename Value="gameconfigform.pas"/>
|
||||
<Caret Line="80" Column="23" TopLine="64"/>
|
||||
</Position25>
|
||||
<Position26>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="51" Column="1" TopLine="23"/>
|
||||
<Filename Value="gameconfigform.pas"/>
|
||||
<Caret Line="82" Column="40" TopLine="64"/>
|
||||
</Position26>
|
||||
<Position27>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="52" Column="1" TopLine="24"/>
|
||||
<Filename Value="gameconfigform.pas"/>
|
||||
<Caret Line="85" Column="52" TopLine="65"/>
|
||||
</Position27>
|
||||
<Position28>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="53" Column="1" TopLine="25"/>
|
||||
<Filename Value="gameconfigform.pas"/>
|
||||
<Caret Line="80" Column="26" TopLine="64"/>
|
||||
</Position28>
|
||||
<Position29>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="54" Column="1" TopLine="26"/>
|
||||
<Filename Value="gameconfigform.pas"/>
|
||||
<Caret Line="85" Column="42" TopLine="64"/>
|
||||
</Position29>
|
||||
<Position30>
|
||||
<Filename Value="gameplayform.pas"/>
|
||||
<Caret Line="55" Column="1" TopLine="27"/>
|
||||
<Filename Value="gameconfigform.pas"/>
|
||||
<Caret Line="80" Column="41" TopLine="64"/>
|
||||
</Position30>
|
||||
</JumpHistory>
|
||||
</ProjectOptions>
|
||||
|
Reference in New Issue
Block a user