Jump to content

Leaderboard


Popular Content

Showing content with the highest reputation on 01/04/23 in all areas

  1. Lars Fosdal

    Object files for Google Snappy C API?

    The quality of posts is far more important than the quantity of posts. Focus on the quality of your posts, and you'll have no complaints.
  2. CarloM

    PDF view on Android

    Hello, I need to show a PDF in app, on iOS works well with TWebBrowser, but no in android. Any workaround, component ? Thank you
  3. I designed a simple demo showing how to query ChatGPT using Delphi code and ICS, and show answers. The source code is there: https://github.com/fpiette/DelphiChatGPT
  4. KMarb

    delphi camera focus

    well, my app is only for a small set of users, and we might have 20 different devices right now. On 3 that I have tested, this works: create: camera := TCameraComponent.Create (nil); camera.Kind := FMX.Media.TCameraKind.FrontCamera; camera.FocusMode := TFocusMode.Locked; when need back camera: if camera.Kind <> FMX.Media.TCameraKind.BackCamera then begin camera.Kind := FMX.Media.TCameraKind.BackCamera; camera.FocusMode := TFocusMode.ContinuousAutoFocus; camera.OnSampleBufferReady := backCameraSampleBufferReady; end; and to flip back to front camera: if camera.Kind <> FMX.Media.TCameraKind.FrontCamera then begin camera.FocusMode := TFocusMode.Locked; camera.Kind := FMX.Media.TCameraKind.FrontCamera; camera.OnSampleBufferReady := frontCameraSampleBufferReady; end; It sounds like some devices (Samsung S4) might fail with the above code, but for the most part this should work. Thank you for the help.
  5. programmerdelphi2k

    How to add an item to ComboEdit2 after an item from Comboedit1 has been selected

    that way it's better: procedure TForm1.ComboEdit1Change(Sender: TObject); var i: integer; begin i := ComboEdit2.Items.IndexOf(ComboEdit1.Items[ComboEdit1.ItemIndex]); if i = -1 then i := ComboEdit2.Items.Add(ComboEdit1.Items[ComboEdit1.ItemIndex]); // ComboEdit2.ItemIndex := i; end;
  6. I wrote de demo program showing how to query ChatGPT from your Delphi program. Using ICS of course. See this post:
  7. Lars Fosdal

    Footman

    with is a horrific construct with loads of pitfalls. Don't use it.
  8. ChatGPT does not _understand_ the question, nor does it _understand_ its own answer. ChatGPT tries to detect some kind of pattern, the question fits in and generates an answer, again dpending of patterns. While ChatGPT is astonishingly good at both, patterns tend to have kind of grey areas where information is not exakt or not right. So it is quite easy to make ChatGPT give complete nonsense answers. So both Nietzsche as well as Beethoven are named as Austrian people. Restricting the question to living Austrians is funny enough: Tell me some famous Austrian people. Some famous people who are from Austria include: Wolfgang Amadeus Mozart (composer) Arnold Schwarzenegger (actor and politician) Sigmund Freud (psychologist) Gustav Klimt (artist) Friedrich Nietzsche (philosopher) Ludwig van Beethoven (composer) Adolf Hitler (politician) Josef Hoffmann (architect and designer) Franz Schubert (composer) Maria von Trapp (singing family made famous by the movie "The Sound of Music") Bernd Maierhofer Living ones! Sure, here are some famous living Austrians: Thomas Klestil (former President of Austria) Gerard Mortier (opera director) Elfriede Jelinek (Nobel Prize-winning author) Michael Haneke (film director) Helmut Marko (Formula 1 racing official) Andreas Maislinger (founder of the Austrian Holocaust Memorial Service) Wolfgang Puck (chef and restaurateur) Johann Wolfgang von Goethe (alpine skier) Christina Aguilera (singer and actress) Alain Prost (Formula 1 racing driver) Thomas Klestil died in 2004. Johann Wolfgang von Goethe definintely is nor was an alpine skier. So here are 5 answers wrong.
×