Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
procedure ChangeWordColor(RE: TrichEdit; TheWord: String; Color: TColor; Style: TFontStyles); var i, CharPos, noChars: Integer; cmp : TComponent; begin CharPos := 0; noChars := 0; for i := 0 to Pred(cmp.Lines.Count) do Begin noChars := noChars + Length(RE.Lines[i]); CharPos := RE.FindText(TheWord, CharPos, noChars, [stWholeWord]); RE.SelStart := CharPos; RE.SelLength := Length(TheWord); if RE.SelAttributes.Color = clRed then Begin RE.SelAttributes.Color := color; RE.SelAttributes.Style := Style; End; End; end;
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|control image tags in a string ?||12||153|
|How to create virtual printer while installing my application||5||69|
|Tidtcpserver listening on multiports?||1||44|
|Delphi android app hide keyboard||3||41|