PDA

View Full Version : Redirect کردن به یک صفحه دیگر در Intraweb



ali643
یک شنبه 14 دی 1382, 02:29 صبح
سلام

دوستان تو محیطIntar web چه طوری میشه از یک فرم برای فرم دیگه کد نوشت
مثلا بازدن رو کلید ثبت اطلاعات Table فرم بعدی رو Active:=True کند
ممنون

مهدی کرامتی
یک شنبه 14 دی 1382, 02:40 صبح
علی آقا، تیتر سوالتون گویا نیست. اصلاح شد.

ali643
یک شنبه 14 دی 1382, 02:49 صبح
مرسی عزیز :wink:

مهدی کرامتی
دوشنبه 15 دی 1382, 06:10 صبح
برگرفته از راهنمای Intraweb :


procedure TformMain.butnOkClick(Sender: TObject);

var

s: string;

begin

s := Trim(editText.Text);

editText.Text := '';

if s = '' then begin

{ navigate to the second form only if some text was entered }

WebApplication.ShowMessage('Please enter some text.');
end else begin
with FDialogForm do begin
{ add edited text to the memo }
IWMemo1.Lines.Add(s);
{ increase the number of times the form was shown }
Inc(FCount);
{ show the form }
Show;
end;
end;
end;


در حقیقت رفتن به یک صفحه خاص با استفاده از متد Show آن صفحه انجام میشود. در مثال فوق نام صفحه (فرم) مقصد FDialogForm میباشد و همانطور که می‌بینید:


with FDialogForm do begin
...
{ show the form }
Show;

دستور فوق میتواند بدین شکل نیز استفاده شود:


FDialogForm.Show;