Form Designer Basics
This sample shows you how to drag and drop controls onto a form at runtime (thereby creating a runtime form designer) and how to move the controls around as well as resize them.
AI
AI 摘要: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.
源代码
Upload
Here is an example of what the function returns: <br>
'The day today is ' + daytoday+'.'<br>
Returns on a monday:<br>
The day today is Monday.<br><br>
Here is the function:<br>
function daytoday: string;<br>
begin<br>
Result:=''; {Can be removed}<br>
if dayofweek(now)=1 then<br>
result:='Sunday' else<br>
if dayofweek(now)=2 then<br>
result:='Monday' else<br>
if dayofweek(now)=3 then<br>
result:='Tuesday' else<br>
if dayofweek(now)=4 then<br>
result:='Wednesday' else<br>
if dayofweek(now)=5 then<br>
result:='Thursday' else<br>
if dayofweek(now)=6 then<br>
result:='Friday' else<br>
if dayofweek(now)=7 then<br>
result:='Saturday';<br>
end;
原始评论 (3)
从 Wayback Machine 恢复