Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations Wanet Telecoms Ltd on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Recent content by MarioMonteiro

  1. MarioMonteiro

    Apostrophies in strings...

    Try use "Parametrized Query" Query1.SQL.Add('Insert into Blah values (:pBlaValue)'); Query1.Prepare; Query1.ParamByName('pBlaValue').AsString := Edit1.Text; Query1.ExecSQL;
  2. MarioMonteiro

    Replace a space with nothing ???

    A simple solution is use the StringReplace function. MyString := 'I want remove the spaces in string :))'; MyNewString := StringReplace(MyString, #32, '', [rfReplaceAll, rfIgnoreCase]); Enjoy
  3. MarioMonteiro

    Toutline component

    Hi, Use the SelectedItem property, for example, on the OnClick event of TOutLine Component. procedure TForm1.Outline1Click(Sender: TObject); begin Label1.caption := Outline1.Lines[Outline1.selecteditem-1]; end;
See more

Part and Inventory Search

Back
Top