[Lazarus] Newbie questions
Paul Ishenin
webpirat at mail.ru
Wed May 7 15:54:45 CEST 2008
Bill de Carle wrote:
> At 09:39 PM 5/5/2008, Paul Ishenin wrote:
>
>> [..]
>> You can turn KeyPreview of your Form to True and add OnKeyPress handler.
>> In your OnKeyPress handler make a check for space key and focus control
>> you like.
>>
>> For example:
>>
>> TForm1.Form1KeyPress(Sender: TObject; var Key: Char);
>> begin
>> if Key = 32 then
>> PerformTab(True);
>> end;
>>
>
> Although this works, it should be noted that the results are not
> identical when using the space bar and the tab key. The tab key
> simply moves the cursor to the next input box whereas the space bar
> first appends a space character to the end of the text in the edit
> box, then performs the tab function.
>
[skip]
replace you code with:
if Key = #32 then
begin
PerformTab(True);
Key := #0;
end;
> On another point, I see the UpDown widget doesn't work exactly as
> expected. Normally one would expect the value (.position) to
> increase then the uparrow
> is clicked and decrease when the downarrow is clicked. That happens
> most of the time in the current implementation but it seems that
> whenever the direction changes the first click in the new direction
> actually performs the *old* operation first before changing the
> direction. For example, with a starting value of 0, if we upclick
> three times in a row the value goes to 1, 2, 3 just as expected. If
> we now click on the downarrow the value goes to
> 4 instead of 2. Subsequent clicks on the downarrow work as
> expected. I see there is a website for viewing bugs but haven't
> found a place to report such things. Is there an official bug-logging place?
>
Open http://mantis.freepascal.org/, create and account there - you'll be
reporter then. Select lazarus project and press "Report Issue" link.
Best regards,
Paul Ishenin.
More information about the Lazarus
mailing list