= Підрядок не знайдено raquo ;;=0;
} (choice == 2)
{(int l=0; l lt;=n; l ++)
{++;=algorithm_KMP (fstr, l);
if (a!=- 1)
{- gt; Text += Підрядок знайдена в рядку + (l) + за адресою + (A) + r n raquo ;;=1;
}
} (b == 0) - gt; Text= Підрядок не знайдено raquo ;;
kol=0;
}=omp_get_wtime ();=Time2 - Time1; - gt; Text= Час: + String :: Format ( {0: F5} , Time2);
} :: Show ( Введіть шукану підрядок );
} :: Show ( Масив структур не заповнений );
}: System :: Void radioButton1_CheckedChanged (System :: Object ^ sender, System :: EventArgs ^ e)
{= 1;
}: System :: Void radioButton2_CheckedChanged (System :: Object ^ sender, System :: EventArgs ^ e)
{= 2;
}: System :: Void button3_Click (System :: Object ^ sender, System :: EventArgs ^ e)
{[] arr; gt; Close ();
}: System :: Void button4_Click (System :: Object ^ sender, System :: EventArgs ^ e)
{(Addline () == 1)
{- gt; Text= Кількість символів: + Longstr; :: Show ( Елемент доданий );
} :: Show ( Помилка при додаванні елемента );
}: System :: Void button5_Click (System :: Object ^ sender, System :: EventArgs ^ e)
{(n!=- 1)
{number=- 1; (textBox5- gt; Text!= )
{= Convert :: ToInt32 (textBox5- gt; Text); (number!=- 1)
{(int i=0; i lt;=n; i ++) (arr [i] .id == number)
{= longstr - strlen (arr [i] .str); [i] .id=- 10;
}
- gt; Text= Кількість символів: + Longstr; - gt; Clear (); ();
} :: Show ( Видалення успішно );
} :: Show ( Сталася помилка при видаленні );
} :: Show ( Заповніть масив структур );
}: System :: Void очістітьМассівСтруктурToolStripMenuItem_Click (System :: Object ^ sender, System :: EventArgs ^ e)
{- gt; Clear (); - gt; Clear (); - gt; Clear (); - gt; Clear (); - gt; Clear ();=0;
label6- gt; Text= Кількість символів: raquo ;; - gt; Text= Час: raquo ;;
delete [] arr;=new line [10000];=- 1;
}: System :: Void откритьToolStripMenuItem_Click (System :: Object ^ sender, System :: EventArgs ^ e)
{- gt; ShowDialog (); (openFileDialog1- gt; FileName == nullptr) return;
{^ filename=openFileDialog1- gt; FileName; _ptr lt; const wchar_t gt; whs=PtrToStringChars (filename); _ s (file, whs); MyReader=gcnew IO :: StreamReader (openFileDialog1- gt; FileName, System :: Text :: Encoding :: GetEncoding (1251));- gt; Text=MyReader- gt; ReadToEnd (); gt; Close ();
} (IO :: FileNotFoundException ^ Ситуація)
{:: Show (ситуація- gt; Message + nФайл не найден raquo ;, Помилка raquo ;, MessageBoxButtons :: OK, MessageBoxIcon :: Exclamation);
} (Exception ^ Ситуація)
{:: Show (ситуація- gt; Message, Помилка raquo ;, MessageBoxButtons :: OK, MessageBoxIcon :: Exclamation);
}
}
};
}
